Check that ... is empty and if so call base::unique(x, incomparables = incomparables, MARGIN = MARGIN, fromLast = fromLast) (else throw an error)

uniques(x, ..., incomparables = FALSE, MARGIN = 1, fromLast = FALSE)

Arguments

x

items to be compared.

...

not used, checked to be empty to prevent errors.

incomparables

passed to base::unique.

MARGIN

passed to base::unique.

fromLast

passed to base::unique.

Value

base::unique(x, incomparables = incomparables, MARGIN = MARGIN, fromLast = fromLast)

Examples

x = c("a", "b") y = c("b", "c") # task: get unique items in x plus y unique(c(x, y)) # correct answer
#> [1] "a" "b" "c"
unique(x, y) # oops forgot to wrap arguments, quietly get wrong answer
#> [1] "a" "b"
tryCatch( uniques(x, y), # uniques catches the error error = function(e) { e })
#> <simpleError: wrapr::uniques unexpected arguments: ‘y’>
uniques(c(x, y)) # uniques works like base::unique in most case
#> [1] "a" "b" "c"