rayleigh(lscale = "loge", nrfs = 1/3 + 0.01,
oim.mean = TRUE, zero = NULL)
cenrayleigh(lscale = "loge", oim = TRUE)
Links
for more choices.
A log link is the default because $b$ is positive.TRUE
means the mean of the OIM elements are used as working weights.
If TRUE
then this argument has top priority for working
out the working weights.
FALSE
means TRUE
means the Newton-Raphson algorithm, and
FALSE
means Fisher scoring.CommonVGAMffArguments
."vglmff"
(see vglmff-class
).
The object is used by modelling functions such as vglm
,
rrvglm
and vgam
.oim
is not fully complete.
The cenrayleigh
handles right-censored
data (the true value is greater than the observed value). To indicate
which type of censoring, input extra = list(rightcensored = vec2)
where vec2
is a logical vector the same length as the response.
If the component of this list is missing then the logical values are
taken to be FALSE
. The fitted object has this component stored
in the extra
slot.
Th rayleigh
handles multiple responses.
Rayleigh
,
genrayleigh
,
riceff
,
maxwell
.nn <- 1000; Scale <- exp(2)
rdata <- data.frame(ystar = rrayleigh(nn, scale = Scale))
fit <- vglm(ystar ~ 1, rayleigh, rdata, trace = TRUE, crit = "c")
head(fitted(fit))
with(rdata, mean(ystar))
coef(fit, matrix = TRUE)
Coef(fit)
# Censored data
rdata <- transform(rdata, U = runif(nn, 5, 15))
rdata <- transform(rdata, y = pmin(U, ystar))
par(mfrow = c(1,2)); hist(with(rdata, ystar)); hist(with(rdata, y))
extra <- with(rdata, list(rightcensored = ystar > U))
fit <- vglm(y ~ 1, cenrayleigh, rdata, trace = TRUE, extra = extra)
table(fit@extra$rightcen)
coef(fit, matrix = TRUE)
head(fitted(fit))
Run the code above in your browser using DataLab