testSetEqual(c("a", "b"), c("a", "b"))
testSetEqual(1:3, 1:4)
# x is not converted before the comparison (except for numerics)
testSetEqual(factor("a"), "a")
testSetEqual(1, "1")
testSetEqual(1, as.integer(1))
Run the code above in your browser using DataLab