Nothing
library(testthat)
library(RDS)
context("differential-activity.R")
test_that("differential-activity",{
data(faux)
expect_equal(structure(c(1.03342283930911, 1), class = "differential.activity.estimate"),
differential.activity.estimates(faux,"X",weight.type="RDS-II"))
})
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.