library(relectro)
library(testthat)
context("ElectroProject")
test_that("ElectroProject", {
## Generate new ElectroProject
ep <- new("ElectroProject")
## Do tests
expect_equal(ep@directory, "")
rm(ep)
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.