查找列表中的几个最小数字

Question

运行一个函数后，我得到了15个整数的列表。我想只选择那些小于10的整数。 之后，我只将小于10的整数除以大于10的整数。 由于只有15个整数，我可以手动完成所有操作，例如输入2/13。但我想知道是否有更合适的方法来做到这一点。

Answer 1

假设我正确地理解了你的问题，那么这样的事情呢？

# create dataset:
x <- sample(1:20, 15)
> x
 [1]  1 19  9 18 10  2  4 14 12  6 16  5 15 20  7
# select those < 10
sel <- x < 10
# divide number of integers <10 by those not <10
length(x[sel])/length(x[!sel])
[1] 0.875