Is DatasetMeta object
is_DatasetMeta(x)
TRUE
if DatasetMeta, FALSE
if not
load(metacore_example("pilot_ADaM.rda"))
adsl <- select_dataset(metacore, "ADSL", quiet = TRUE)
#> ✔ ADSL dataset successfully selected
#> ℹ Dataset metadata specification subsetted with suppressed warnings
#>
is_DatasetMeta("DUMMY") # Expect FALSE
#> [1] FALSE
is_DatasetMeta(metacore) # Expect FALSE
#> [1] FALSE
is_DatasetMeta(adsl) # Expect TRUE
#> [1] TRUE