compare_values(c(1,2), c(1,2)) # 0
compare_values(c(1,2), c(1,3)) # NA
compare_values(c(1,2), c(3,4)) # -1
compare_values(c(1,2), c(2,4)) # NA
compare_values(c(1,2), c(2.1,4)) # -1
compare_values(c(1,2.05), c(2.1,4)) # -1
compare_values(c(3,4), c(3,4)) # 0
compare_values(c(5,5), c(3,4)) # +1
compare_values(c(5,5), 2) # +1
compare_values(c(5,2), 2) # NA
compare_values(c(5,3), 2) # +1
compare_values(distribution(5,3), 2) # NA
compare_values(distribution(5,3), 5) # -1
Run the code above in your browser using DataLab