R中的循环语句有问题

Question

我在编写正确的R代码时无法执行循环的if条件测试。我试图解决x（必须是整数），例如F_c = 5（见下文）。 z和w都是一系列已知值，z表示丰度值，w表示采样的区域。现在我基本上输入x的随机值，看看我能接近F_c = 5的距离。我想为此编写一个循环，并且当x的迭代结果为F_c = 5时，循环也会停止。任何帮助将非常感激，我花了很多时间在这上面并没有找到类似的问题发布（但如果有一个请指导我解决方案）。谢谢，

cond = ifelse(z<=x, 1, 0)

F_c = 100*(sum(w*z*cond)/sum(w*z))

Answer 1

不太清楚，但我假设您想知道w*z的累积总和达到sum(w*z)的5％，同时遵循{{1}的顺序}}。如果这是正确的，你可以试试这个：

z