context("symdiff")
test_that("symdiff", {
expect_equal(symdiff(c(1, 2), 1), 2)
expect_equal(symdiff(c(1, 2), numeric(0)), c(1, 2))
expect_equal(symdiff("a", "b"), c("a", "b"))
expect_equal(symdiff("a", "a"), character(0))
})
Generated by dwww version 1.15 on Fri May 24 02:33:39 CEST 2024.