сравнивая 2 вектора, когда разница очень мала

Question

Я пытаюсь сравнить LHS и RHS в R между двумя векторами или если разница меньше 1e-10, но у меня возникают проблемы, когда RHS отрицательна

A2% *% бета <= b2 </p>

Пожалуйста, смотрите код ниже

   A2 <- matrix(c(1, 1, 0, 0, 0, 0), nrow = 1) # Lhs
   b2 <- matrix(-12, nrow = 1) # Rhs

   beta1 <- c(-12.194608285, 0.194608285, 0.002113886, -4.514099372, 0.260898524, -0.004513579)

   > (lhs2 <- A2 %*% beta1)
        [,1]
  [ 1,]  -12
   > (lhs2[abs(lhs2 - b2) < 1e-12] <- 0L)
     [1] 0
   > lhs2 - b2 <= 1e-12
          [,1]
     [1,] FALSE

Я понятия не имею, почему я получаю FALSE, когда предполагается, что это правда.