tests/testthat/test_utils.R

context("Generics")

test_that("print summaries mandelbrot objects", {
  mb <- mandelbrot()
  expect_output(print(mb), "Mandelbrot")
  expect_output(print(mb), nrow(mb))
})
blmoore/mandelbrot documentation built on May 31, 2019, 8:05 a.m.