library('replyr') context("nrow") test_that("test_replyr_nrow.R", { d <- data.frame(x = c(1, 2)) replyr_nrow(d) })
Add the following code to your website.
REMOVE THIS Copy to clipboard
For more information on customizing the embed code, read Embedding Snippets.