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