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")
})
leighseverson/rnoaa documentation built on May 21, 2019, 3:06 a.m.