tests/testthat.R

library(testthat)
library(samplePackage)

con <- bzfile("accident_2013.csv.bz2", "w")
write.csv(accident_2013, con, row.names = FALSE)
close(con)

test_check("samplePackage")

unlink("accident_2013.csv.bz2")
fernandovmacedo/samplePackage documentation built on May 14, 2017, 1:14 a.m.