testDisjunct(1L, letters)
testDisjunct(c("a", "z"), letters)
# x is not converted before the comparison (except for numerics)
testDisjunct(factor("a"), "a")
testDisjunct(1, "1")
testDisjunct(1, as.integer(1))
Run the code above in your browser using DataLab