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-tp4617792p4618267.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.
