Well, I get
multinom(formula(data),data=data[Z,])
# weights: 6 (0 variable)
initial value 0.00
final value 0.00
converged
Call:
multinom(formula = formula(data), data = data[Z, ])
Coefficients:
(Intercept) factor2f factor2g factor2h size
Residual Deviance: 0
AIC: 0
Warning mes
Andreas Wittmann wrote:
Dear R-users,
i try to fit a multinomial model in order to get an imputation for a
missing value in factor1.
library(nnet)
factor1 <- factor(c("a","b","c","d"))
factor2 <- factor(c("e","f","g","h"))
size <- c(3,8,2,1)
factor1[3] <- NA
Z<-ifelse(is.na(factor1), 0, 1)
2 matches
Mail list logo