tests/testthat/_snaps/s3-AsIs.md

AsIs

Code
  construct(I(month.abb))
Output
  I(c("Jan", "Feb", "Mar", "Apr", "May", "Jun", "Jul", "Aug", "Sep", "Oct", "Nov", "Dec"))
Code
  construct(I(month.abb), opts_AsIs("next"))
Output
  c("Jan", "Feb", "Mar", "Apr", "May", "Jun", "Jul", "Aug", "Sep", "Oct", "Nov", "Dec") |>
    structure(class = "AsIs")
Code
  construct(I(head(cars, 2)))
Output
  I(data.frame(speed = 4, dist = c(2, 10)))
Code
  x <- 1
  class(x) <- c("AsIs", "foo")
  construct(x)
Output
  I(1 |>
    structure(class = "foo"))
Code
  class(x) <- c("foo", "AsIs")
  construct(x)
Output
  1 |>
    structure(class = c("foo", "AsIs"))


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.