在R中提取特定百分比的数据

Question

Having a vector of sorted integers, I want to extract 10 percent of data from each extreme. For instance having integers from 1 to 100, I want to take 10 percent from left tail of data (1:10) and 10 percent from right tail of data (91:100). I can do it by first sorting data and then dividing into 100 and extracting first and last part. But, I wanted to know if R has a built function for it.

Thanks!

Answer 1

How about a careful use of quantile and sample ?`

xx <- rnorm(1e3)
thresh <- quantile(xx, c(.1, .9))

left <- xx[xx <= thresh[[1]]]
left <- sample(left, length(left) %/% 10)

right <- xx[xx >= thresh[[2]]]
right <- sample(right, length(right) %/% 10)