r - 如何调用加起来为某个数字的组合的输出？

Question

我正在尝试查看以下返回的组合中有多少加起来至少为 46。我应该输入什么代码？

x=c(20,10,16,16,6,15)
L=combn(x,3)

L是6选3的组合列表。

谢谢你！

标签： rsyntaxcombinations

Answer 1

试试这个

x <- c(20,10,16,16,6,15)
sum(combn(x, 3, sum) >= 46)

输出

[1] 6