Displaying 1 result from an estimated 1 matches for "tp4633220p4633222".
2012 Jun 13
4
lme: extract result-function
Hi,
mod <- lme(A ~ -1 + B+C+D+E+F+G, random = ~1 | ...)
results in summary(mod)$coeff
B C D E F G (Intercept)
b c d e f g i
Now I'm interested in the function
f <- function(B,C,D,E,F,G) <- {
return(i + b*B + c*C + d*D + e*E + f*F + g*G)
}
Is there a easier way to create such function with flexible number of
coefficient, than do it by hand?
thx
Christof