data(mtcars)
library(ggplot2)
library(magrittr)
library(tibble)
library(testthat)
p = ggplot( mtcars , aes( cyl, mpg ) ) +
geom_point()
test_that( "ggplotUV works" , {
expect_equal_to_reference(c("a"), file = "basicTest.rds" )
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.