R help - Jul 2009 - Runtime Error with multinom

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)

assign("data", cbind.data.frame(factor1,factor2,size),pos=1)
multinom(formula(data),data=data[Z,])

when entering the last line i get a runtime error and R crashes down.

my system is windows xp and R 2.9.1, i tried it also with ubuntu 9.04 
and R.2.8.1 but i get a quite similar error.

Many thanks if anyone could tell me what i do wrong and what is the 
problem here.

best regards

Andreas

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)
> 
> assign("data", cbind.data.frame(factor1,factor2,size),pos=1)
> multinom(formula(data),data=data[Z,])
> 
> when entering the last line i get a runtime error and R crashes down.
> 
> my system is windows xp and R 2.9.1, i tried it also with ubuntu 9.04 
> and R.2.8.1 but i get a quite similar error.
> 
> Many thanks if anyone could tell me what i do wrong and what is the 
> problem here.

Please report bugs in packages to the package maintainer (who in this 
case probably has read your message already, CCing anyway).

Best wishes,
Uwe Ligges



> best regards
> 
> Andreas
> 
> ______________________________________________
> R-help at r-project.org mailing list
> https://stat.ethz.ch/mailman/listinfo/r-help
> PLEASE do read the posting guide 
> http://www.R-project.org/posting-guide.html
> and provide commented, minimal, self-contained, reproducible code.