Displaying 1 result from an estimated 1 matches for "cendiv".
Did you mean:
cendio
2001 Mar 28
4
efficiency and "forcing" questions
...X.Iprimnaic.23+X.Iprimnaic.24+X.Iprimnaic.25+X.Iprimnaic.26,
data=x, nterms=numterm, max.terms= min(nrow(x),40), optlevel=3
)
cat("group =", x$group[1],"\n")
cat("NAIC =", x$naic4[1],"\n")
cat("cendiv =", as.character(x$cendiv[1]),"\n")
cat("number of obs used =", nrow(x),"\n")
print(summary(pprfile.ppr))
}
grouparr <- levels(as.factor(wintemp4$group))
pprest <- vector(mode="list",length=length(grouparr))
for(i in seq(along=groupar...