About
test_dataExamples <- function(){ data(cnSetExample) checkTrue(validObject(cnSetExample)) data(cnSetExample2) checkTrue(validObject(cnSetExample2)) }