return()

Hi,
i get only one value, but expect ncol values  - what's wrong ?

You only compute one value for y and then return it. The assignment to y
is outside the loop, but in any case it would overwrite the previous value

test <- function(){
       for (i in 1:ncol(configData))
       x <- subset(configData, Q71 == 1 & configData[,i] ==1 , select =
configData[,i])
       y <- (dim(x)[1]/dim(configData)[1])*100
       return(y) }

My guess is that you mean something like
 test <- function(){
	y<-numeric(ncol(configData))
        for (i in 1:ncol(configData)){
          x <- subset(configData, Q71 == 1 & configData[,i] ==1 , select = configData[,i])
          y[i] <- (dim(x)[1]/dim(configData)[1])*100
        }
        return(y) }



     -thomas

Thomas Lumley			Asst. Professor, Biostatistics
tlumley at u.washington.edu	University of Washington, Seattle

-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-
r-help mailing list -- Read http://www.ci.tuwien.ac.at/~hornik/R/R-FAQ.html
Send "info", "help", or "[un]subscribe"
(in the "body", not the subject !)  To: r-help-request at stat.math.ethz.ch
_._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._