tests/testthat/test_get_data.R
In jimtyhurst/stackR: Functions to Explore, Analyze, and Visualize Open Data from stackexchange.com
library(testthat)
TOLERANCE = 0.0001
EXPECTED_N_ROWS <- 1
EXPECTED_N_COLS <- 3
context("exploring Stack Exchange data")
test_that("data set has the expected dimensions", {
se <- get_stack_exchange_data()
actual_n_rows = dim(se)[1]
expect_equal(actual_n_rows, EXPECTED_N_ROWS, tolerance = TOLERANCE)
actual_n_cols = dim(se)[2]
expect_equal(actual_n_cols, EXPECTED_N_COLS, tolerance = TOLERANCE)
})
jimtyhurst/stackR documentation built on May 17, 2019, 6:12 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)
TOLERANCE = 0.0001
EXPECTED_N_ROWS <- 1
EXPECTED_N_COLS <- 3
context("exploring Stack Exchange data")
test_that("data set has the expected dimensions", {
se <- get_stack_exchange_data()
actual_n_rows = dim(se)[1]
expect_equal(actual_n_rows, EXPECTED_N_ROWS, tolerance = TOLERANCE)
actual_n_cols = dim(se)[2]
expect_equal(actual_n_cols, EXPECTED_N_COLS, tolerance = TOLERANCE)
})
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.