tests/testthat/test-get_star_schema.R

context("test get_star_schema")

test_that("get_star_schema works", {
  d <- get_star_schema(ct_mrs_test, "mrs_age")

  expect_equal(class(d), "star_schema")
})

Try the starschemar package in your browser

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

starschemar documentation built on Nov. 11, 2023, 5:09 p.m.