tests/testthat/test-pivot_addin.R

test_that("pivot_addin works", {

  ui <- pivot_ui("ID", LETTERS)
  # server <- pivot_server()

  expect_is(ui, "shiny.tag")
  # expect_is(server, "function")
})
dreamRs/flexpivot documentation built on Oct. 26, 2023, 9:46 a.m.