context("print.R")


test_that("tibble printing works", {
  library(dplyr)
  expect_output(print(starwars))
  expect_output(print(septic_patients))
})