tests/testthat/test-s3-ggplot2-theme.R

test_that("theme", {
  expect_snapshot({
    construct(ggplot2::theme_bw())
    construct(ggplot2::theme_bw(base_size = 11, base_line_size = 0.5))
    construct(ggplot2::theme_bw(base_size = 22, base_line_size = 0.5))
    construct(ggplot2::theme_bw(base_size = 11, base_line_size = 1))
    construct(ggplot2::theme_bw(base_size = 22, base_line_size = 1))
    construct(ggplot2::theme())
    construct(ggplot2::theme(axis.title = "foo"))
  })
})

Try the constructive package in your browser

Any scripts or data that you put into this service are public.

constructive documentation built on April 3, 2025, 9:39 p.m.