diff --git a/tests/testthat/test-ncdc.r b/tests/testthat/test-ncdc.r index 745e939f..51d189ac 100644 --- a/tests/testthat/test-ncdc.r +++ b/tests/testthat/test-ncdc.r @@ -1,6 +1,8 @@ context("ncdc") test_that("ncdc returns the correct ...", { + skip_on_cran() + vcr::use_cassette("ncdc", { # Normals Daily GHCND:USW00014895 dly-tmax-normal data aa <- ncdc(datasetid='NORMAL_DLY', datatypeid='dly-tmax-normal', startdate = '2010-05-01', enddate = '2010-05-10') @@ -41,6 +43,8 @@ test_that("ncdc returns the correct ...", { context("ncdc: add units") test_that("ncdc add units works", { + skip_on_cran() + vcr::use_cassette("ncdc_add_units", { # not add units aa <- ncdc(datasetid='NORMAL_DLY', datatypeid='dly-tmax-normal', diff --git a/tests/testthat/test-ncdc_datacats.r b/tests/testthat/test-ncdc_datacats.r index 99c33eaf..c0ba684b 100644 --- a/tests/testthat/test-ncdc_datacats.r +++ b/tests/testthat/test-ncdc_datacats.r @@ -1,6 +1,8 @@ context("ncdc_datacats") test_that("ncdc_datacats returns the correct ...", { + skip_on_cran() + vcr::use_cassette("ncdc_datacats", { tt <- ncdc_datacats() uu <- ncdc_datacats(datacategoryid="ANNAGR") diff --git a/tests/testthat/test-ncdc_datasets.r b/tests/testthat/test-ncdc_datasets.r index 8c0b9c3e..cf8019f7 100644 --- a/tests/testthat/test-ncdc_datasets.r +++ b/tests/testthat/test-ncdc_datasets.r @@ -1,6 +1,8 @@ context("ncdc_datasets") test_that("ncdc_datasets returns the correct class", { + skip_on_cran() + vcr::use_cassette("ncdc_datasets", { tt <- ncdc_datasets() uu <- ncdc_datasets(datasetid='ANNUAL') diff --git a/tests/testthat/test-ncdc_datatypes.r b/tests/testthat/test-ncdc_datatypes.r index a5138b0a..2cd82f41 100644 --- a/tests/testthat/test-ncdc_datatypes.r +++ b/tests/testthat/test-ncdc_datatypes.r @@ -1,6 +1,8 @@ context("ncdc_datatypes") test_that("ncdc_datatypes returns the correct class", { + skip_on_cran() + vcr::use_cassette("ncdc_datatypes", { tt <- ncdc_datatypes(datasetid = "ANNUAL") diff --git a/tests/testthat/test-ncdc_locs.r b/tests/testthat/test-ncdc_locs.r index 596e7df0..5e88f5bb 100644 --- a/tests/testthat/test-ncdc_locs.r +++ b/tests/testthat/test-ncdc_locs.r @@ -1,6 +1,8 @@ context("ncdc_locs") test_that("ncdc_locs returns the correct class", { + skip_on_cran() + vcr::use_cassette("ncdc_locs", { tt <- ncdc_locs(datasetid='NORMAL_DLY', startdate='20100101') uu <- ncdc_locs(locationcategoryid='ST', limit=52) diff --git a/tests/testthat/test-ncdc_locs_cats.r b/tests/testthat/test-ncdc_locs_cats.r index 80656127..28e41b36 100644 --- a/tests/testthat/test-ncdc_locs_cats.r +++ b/tests/testthat/test-ncdc_locs_cats.r @@ -1,6 +1,8 @@ context("ncdc_locs_cats") test_that("ncdc_locs_cats returns the correct ...", { + skip_on_cran() + vcr::use_cassette("ncdc_locs_cats", { tt <- ncdc_locs_cats() uu <- ncdc_locs_cats(locationcategoryid='CLIM_REG') diff --git a/tests/testthat/test-ncdc_stations.r b/tests/testthat/test-ncdc_stations.r index c2d73d44..948ed559 100644 --- a/tests/testthat/test-ncdc_stations.r +++ b/tests/testthat/test-ncdc_stations.r @@ -1,6 +1,8 @@ context("ncdc_stations") test_that("ncdc_stations returns the correct...", { + skip_on_cran() + vcr::use_cassette("ncdc_stations", { bb <- ncdc_stations(stationid='COOP:010008') cc <- ncdc_stations(datasetid='NORMAL_DLY', stationid='GHCND:USW00014895')