Nothing
#
# 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.")
})
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.