Sorry, my mistake. it works very well!!!
thanks, Rui Barradas wrote > > Hello, > > > york8866 wrote >> >> Hi, John, >> >> the code ran well. >> >> however, somehow, the means were not calculated correctly using the >> following code. >> >> test <- read.csv("Rtestdataset.csv", as.is=T,header=T) >> test <- data.frame(test) >> test >> rowMeans(test) >> apply(test,1,function(y)mean(y>=0)) >> >> Is there anything wrong? >> thanks, >> > > Yes!!! > > It's mean( y[y >= 0] ) > > Rui Barradas > -- View this message in context: http://r.789695.n4.nabble.com/Help-deleting-negative-values-in-a-matrix-and-do-statistic-analysis-tp4617792p4618379.html Sent from the R help mailing list archive at Nabble.com. ______________________________________________ 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.