Displaying 1 result from an estimated 1 matches for "x1_target_names0".
2013 Aug 09
1
a fast table() for the 1D case
...c(.BASIC_EXCLUDES, more_excludes)
for (exclude in excludes)
.test_exclude(x, varname, target_names0, target_data0, exclude)
}
## Test on a numeric vector.
x0 <- numeric(0)
.do_exclude_tests(x0, "x0", character(0), integer(0), list(5.3))
x1_target_names0 <- c(-9, 4, 5.3, NaN, NA)
x1_target_data0 <- c(1L, 2L, 1L, 2L, 3L)
x1 <- c(5.3, 4, NaN, 4, NA, NA, NaN, -9, NA)
excludes <- list(c(5.3, -9),
c(5.3, NA, -9),
c(5.3, NaN, -9),
c(5.3, 80, -9),...