/usr/share/doc/r-cran-modelr/tests/testthat/test-model-matrix.R

test_that("model_matrix() returns a tibble", {
  out <- model_matrix(iris, Sepal.Length ~ Species)
  expect_s3_class(out, "tbl_df")
})

Generated by dwww version 1.15 on Thu Jun 20 14:21:16 CEST 2024.