tests/testthat/test-getAssets.R

context("Assets only.")

t1 = getAssets(limit = 200, data.table = TRUE)
t2 = getAssets(limit = 200, data.table = FALSE)

test_that("Row numbers consolidate when returned as a list or a data table.", {
  expect_equal(nrow(t1), 200)
  expect_length(t2[['_embedded']][['records']], 200)
})
froocpu/stellaR documentation built on May 17, 2019, 7:05 p.m.