File: test_checkListElementClass.R

package info (click to toggle)
r-cran-bbmisc 1.7-1
  • links: PTS, VCS
  • area: main
  • in suites: jessie, jessie-kfreebsd
  • size: 1,156 kB
  • ctags: 13
  • sloc: ansic: 152; sh: 9; makefile: 3
file content (12 lines) | stat: -rw-r--r-- 335 bytes parent folder | download | duplicates (5) 
1
2
3
4
5
6
7
8
9
10
11
12
 
context("checkListElementClass")

test_that("checkListElementClass", {
  checkListElementClass(list(1, 5), cl="numeric")
  expect_error(checkListElementClass(list(1, "a"), cl="numeric"), "numeric")
  
  xs = list("a", "b")
  checkListElementClass(xs, "character")
  expect_error(checkListElementClass(xs, "integer"), "character")
})