search for: minn38a

...ry foolish or missing something obvious. For example, I tried the documentation help(loglm) example - here's the code # Case 1: frequencies specified as an array. sapply(minn38, function(x) length(levels(x))) ## hs phs fol sex f ## 3 4 7 2 0 minn38a <- array(0, c(3,4,7,2), lapply(minn38[, -5], levels)) minn38a[data.matrix(minn38[,-5])] <- minn38$fol fm <- loglm(~1 + 2 + 3 + 4, minn38a) # numerals as names. deviance(fm) > [1] 0 The deviance is zero. I tried other examples as well (Laura Thompson...

...ns a formula object, a terms object, a function, or some other object with a non-NULL environment, which has been created in the environment of a packaged function. In particular, this would not always occur with a packaged model fitting function, e.g. (from ?loglm in MASS) > library(MASS) > minn38a <- array(0, c(3,4,7,2), lapply(minn38[, -5], levels)) > minn38a[data.matrix(minn38[,-5])] <- minn38$f > fm <- loglm(~1 + 2 + 3 + 4, minn38a) > environment(fm$terms) <environment: R_GlobalEnv> in this case because the terms component is obtained from the formula, whose env...

...ns a formula object, a terms object, a function, or some other object with a non-NULL environment, which has been created in the environment of a packaged function. In particular, this would not always occur with a packaged model fitting function, e.g. (from ?loglm in MASS) > library(MASS) > minn38a <- array(0, c(3,4,7,2), lapply(minn38[, -5], levels)) > minn38a[data.matrix(minn38[,-5])] <- minn38$f > fm <- loglm(~1 + 2 + 3 + 4, minn38a) > environment(fm$terms) <environment: R_GlobalEnv> in this case because the terms component is obtained from the formula, whose env...