n <- 10
P1 <- runif(n)
P2 <- runif(n)
P3 <- P1 + P2 + runif(n)/100
P4 <- P1 + P2 + P3 + runif(n)/100
mydata <- data.frame(cbind(P1,P2,P3,P4))
mydata[1,1] <- 8
mydata[3,1] <- -5
mydata[2,3] <- -6
mydata[7,3] <- 7
f=function(z){quantile(z, c(0.01, 0.99)) }
temp1 <- lapply(mydata, f)
temp1
$P1
1% 99%
-4.542391 7.354209
$P2
1% 99%
0.03452814 0.61029804
$P3
1% 99%
-5.423229 6.498828
$P4
1% 99%
0.7825967 2.8454615
I want to remove rows based on the conditions on the columns as stored in
the vector temp1. Any row containing value less than 1% and value greater
than 99% need to be removed for each of the variable.
How this can be achieved.
Thanks for the help in advance.
Regards,
-Aher
--
View this message in context:
http://r.789695.n4.nabble.com/How-to-delete-rows-using-conditions-on-all-columns-tp3932027p3932027.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.
