tests/testthat/test_graphics.R

#
# To-do: work out how to test graphics in R
#

context("Graphics (NYI)")

test_that("Not yet implemented", {

    ps <- powerSim(fm1, nsim=1)
    expect_error(plot(ps), "Not yet implemented.")
})

Try the simr package in your browser

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

simr documentation built on April 14, 2023, 12:24 a.m.