tests/testthat/test_fars_functions.R
In johnmwaugh/FarsPackage: Fatality Analysis Reporting System
library(testthat)
test_that("fars_functions.R", {
sum13 <- fars_summarize_years(2013)
nov13 <- sum13[11,2]
nov13 <- as.numeric(as.vector(nov13))
expect_that(nov13, equals(2615))
})
johnmwaugh/FarsPackage documentation built on May 24, 2019, 4:06 a.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
library(testthat)
test_that("fars_functions.R", {
sum13 <- fars_summarize_years(2013)
nov13 <- sum13[11,2]
nov13 <- as.numeric(as.vector(nov13))
expect_that(nov13, equals(2615))
})
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.