File: test-object-format.R

package info (click to toggle)
r-cran-roxygen2 7.3.3-1
  • links: PTS, VCS
  • area: main
  • in suites: sid
  • size: 1,940 kB
  • sloc: cpp: 351; sh: 14; makefile: 2
file content (11 lines) | stat: -rw-r--r-- 352 bytes parent folder | download | duplicates (3) 
1
2
3
4
5
6
7
8
9
10
11
 
test_that("format has nice defaults for bare vectors", {
  skip_if(getRversion() <= "4.0.0")

  expect_snapshot({
    call_to_format(x <- list(a = 1, b = 2))
    call_to_format(x <- ordered(letters[1:5]))
    call_to_format(x <- diag(10))
    call_to_format(x <- array(1:27, dim = c(3, 3, 3)))
    call_to_format(x <- data.frame(a = 1, b = 2))
  })
})