tests/testthat/test-ncdc_legacy.R

context("ncdc_legacy")

test_that("basic functionality works", {
  skip("Skipping ncdc_legacy for now")
  
#   res <- ncdc_leg_data('isd', 71238099999, 'TMP', 200101010000, 200101312359)
#   
#   expect_is(res, "data.frame")
#   expect_equal(unique(res$V12), "null")
})
ropensci/rnoaa documentation built on June 27, 2023, 4:53 p.m.