考虑到数据的子集，如何获得每个数据框行的百分位值？

Question

我有一个 145 行和 1000 多列的数据框 obs。

对于每一行，我想提取第 95 个百分位数的值，但仅根据大于或等于 1 的数据进行计算。

考虑到所有数据，我设法为每一行计算一个值，如下所示：

p95.obs <- apply(obs,1,quantile,probs=c(.95))

要包含我尝试过的大于选项

p95.obs <- apply(obs>=1,1,quantile,probs=c(.95))

但是这样我每行只得到1个。

Answer 1

你可以试试

 apply(obs, 1, function(x) quantile(x[x>=1], probs=.95))