frwd_selection | R Documentation |
Implements forward covariate selection for nlme-based non-linear mixed effect models
frwd_selection(base, cv, dat, cutoff = 0.05)
base |
base model |
cv |
a list of candidate covariate to model parameters |
dat |
model data |
cutoff |
significance level |
an nlme object of the final model
dat <- theo_md dat$LOGWT <- log(dat$WT) dat$TG <- (dat$ID < 6) + 0 # dummy covariate specs <- list( fixed = list(lKA = lKA ~ 1, lCL = lCL ~ 1, lV = lV ~ 1), random = pdDiag(lKA + lCL ~ 1), start = c(0.5, -3.2, -1) ) fit0 <- nlme_lin_cmpt(dat, par_model = specs, ncmt = 1) cv <- list(lCL = c("WT", "TG"), lV = c("WT")) fit <- frwd_selection(fit0, cv, dat) print(summary(fit))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.