Thanks all for a very quick solution. It is actually good to know different ways to do the same things. It expands my limited understanding of R :).
-A On Wed, Jan 13, 2010 at 5:12 PM, Stephan Kolassa <stephan.kola...@gmx.de>wrote: > Hi, > > does this do what you want? > > d <- cbind(d,apply(d[,c(2,3,4)],1,mean),apply(d[,c(2,3,4)],1,sd)) > > HTH, > Stephan > > > Abhishek Pratap schrieb: > >> Hi All >> >> I have a data frame in which there are 4 columns . >> >> Column 1 : name >> >> Column 2-4 : values >> >> I would like to calculate mean/Standard error of values in column 2-4 and >> store them in column 5,6 respectively. >> >> >> >> I have done the following but doesn't seem to work >> >> mean_N_SE <-function(x) >> { >> >> name <- x[1] >> vals <- c(x[2:4]) >> temp_mean <- mean(vals) >> SE <- sqrt(var(x)/length(x)) >> >> } >> >> apply(d,1,mean_N_SE) where d = data frame. >> >> >> Can someone help me with this. >> >> Thanks! >> -Abhi >> >> [[alternative HTML version deleted]] >> >> ______________________________________________ >> R-help@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. >> >> > [[alternative HTML version deleted]] ______________________________________________ R-help@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.