计算R中每个分位数的值数量

Question

如果我有这个示例：

chartData

使用例如

可以很容易地估算 y=c(5,6,2,51,54,58,37,75,16,25,22,31,6,4) x=c(5,6,2,1,4,8,7,5,6,5,2,1,5,4) re<-data.frame(x,y)

quantile

我需要估计x和y中具有x> 60％的分位数和y <20％的分位数的对的数量？

Answer 1

以下内容可满足您的需求。

with(re, sum(x > quantile(x, 0.6) & y < quantile(y, 0.2)))
#[1] 0

您可以将此功能用作获得不同分位数的功能。

sumQuant <- function(DF, qx, qy){
  with(DF, sum(x > quantile(x, qx) & y < quantile(y, qy)))
}

sumQuant(re, 0.6, 0.2)
#[1] 0

sumQuant(re, 0.6, 0.4)
#[1] 2

Answer 2

y=c(5,6,2,51,54,58,37,75,16,25,22,31,6,4)
x=c(5,6,2,1,4,8,7,5,6,5,2,1,5,4)
re<-data.frame(x,y)
res <- re[which(x > quantile(x, .6)),]
res <- res[which(y < quantile(y, .2)),]