1test_that("output test", {
2  expect_snapshot({
3    pillar(factor(c(letters[1:5], NA)))
4    pillar(ordered(c(letters[1:5], NA)))
5    pillar(factor("a\nb"))
6  })
7})
8