r - 如果 "a"和 "b"在 R 中的前 4 个小数位相同，则认为它们相等

我想知道如何让 R 将任何两个对象，例如“a”和“b”( 显示在 下方)视为相等 如果它们的前 4 个小数位 完全相同？

P.S. 因此，我在问如何从这个问题中创建一个条件命令。

a = 1.234574789

b = 1.234565638

最佳答案

如果您想了解如何编写自定义函数:

> equal <- function(a, b, sig=4) { return (round(a,sig) == round(b,sig)) }
> equal(1.23456, 1.23457)
[1] TRUE
> equal(1.23456, 1.23557)
[1] FALSE

关于r - 如果 "a"和 "b"在 R 中的前 4 个小数位相同，则认为它们相等，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/43592211/