reference <- data.frame(
a = 1:100, b = 75:174
)
target <- data.frame(
a = 0.001 + (1:100),
b = 76:175
)
test_errors(reference, target, c("a", "b"))
test_errors(reference, target, c("a", "b"), return_logical = FALSE)
Run the code above in your browser using DataLab