我想知道我是否可以用来检查几个总和接近 1的向量的函数是否已经存在。理想情况下，数字总和应该达到1，但如果离它不太远，我也不会打扰。
如果我使用plot(smth$x[-1], diff(smth$y), type="l")
或if(y == 1)，我会得到太多的不匹配，这并不重要，因为差异是由于舍入小数。
我想出将向量四舍五入为零小数，但我希望能够从理想总和中应用某种容差，例如1％或.05
if(y <= 1)答案 0 :(得分：2)
您可以使用all.equal功能并指定所需的容差：
all.equal(sum(y), 1, tolerance = 0.05)
#[1] TRUE