我想要做的或多或少是以下两个线程中讨论的问题的组合：
我有两个数字向量：
b_1 <- c(543.4591, 489.36325, 12.03, 896.158, 1002.5698, 301.569)
b_2 <- c(22.12, 53, 12.02, 543.4891, 5666.31, 100.1, 896.131, 489.37)
我想将所有元素b_1与所有元素进行比较b_2，反之亦然。
如果element_i在b_1被不等于任意数量的范围 element_j ± 0.045中b_2则element_i必须报告。
同样地，如果element_j在b_2被NOT等于任何数目的范围 element_i ± 0.045中b_1则element_j必须报告。
因此，基于上面提供的向量的示例答案将是：
### based on threshold = 0.045
in_b1_not_in_b2 <- c(1002.5698, …