tests/testthat/test_IndustryClassification.R

context("Testing loading IndustryClassification")

## expect_false("WIOD_IndClass" %in% ls())
## data(WIOD_IndClass)
## expect_true("WIOD_IndClass" %in% ls())

## rm(WIOD_IndClass)
## expect_false("WIOD_IndClass" %in% ls())
## WIOD_IndClass
## expect_false("WIOD_IndClass" %in% ls())
## WIOD_IndClass <- WIOD_IndClass
## expect_true("WIOD_IndClass" %in% ls())
zauster/wiodv2 documentation built on May 4, 2019, 9:12 p.m.