tests/testthat/test-vis_r.R

context("test-vis_r")

test_that("vis_r works", {

  library(dplyr)
  expect_is(vis_r(starwars), class = c("gg", "ggplot"))

})
BenjaminLouis/datascan documentation built on May 26, 2019, 1:35 p.m.