Get and set "archived" and "published" status of a dataset
"Archived" datasets are excluded from some views. "Draft" datasets are
visible only to editors, while published datasets are available to all viewers.
A dataset can either be published or in draft, but not both.
These properties are accessed and set with the "is" methods. You can also
set the properties by assigning into the function. The verb functions
archive
and publish
are alternate versions of the setters.
is.archived(x) is.archived(x) <- value is.draft(x) is.draft(x) <- value is.published(x) is.published(x) <- value ## S4 method for signature 'CrunchDataset' is.archived(x) ## S4 method for signature 'CrunchDataset' is.draft(x) ## S4 method for signature 'CrunchDataset' is.published(x) ## S4 replacement method for signature 'CrunchDataset,logical' is.archived(x) <- value archive(x) ## S4 replacement method for signature 'CrunchDataset,logical' is.draft(x) <- value ## S4 replacement method for signature 'CrunchDataset,logical' is.published(x) <- value publish(x) ## S4 method for signature 'DatasetCatalog' is.archived(x) ## S4 method for signature 'DatasetCatalog' is.draft(x) ## S4 method for signature 'DatasetCatalog' is.published(x) ## S4 replacement method for signature 'DatasetCatalog,logical' is.archived(x) <- value ## S4 replacement method for signature 'DatasetCatalog,logical' is.draft(x) <- value ## S4 replacement method for signature 'DatasetCatalog,logical' is.published(x) <- value
x |
CrunchDataset |
value |
logical |
For the getters, the logical value of whether the dataset is archived, in draft mode, or published, where draft and published are inverses. The setters return the dataset.
## Not run: ds <- loadDataset("mtcars") is.draft(ds) # FALSE is.published(ds) # TRUE identical(is.draft(ds), !is.published(ds)) # Can make a dataset a "draft" by: is.draft(ds) <- TRUE is.published(ds) # FALSE # Could also have set is.published(ds) <- FALSE # Now, can go the other way by setting is.draft, is.published, or: ds <- publish(ds) is.published(ds) # TRUE is.archived(ds) # FALSE is.archived(ds) <- TRUE is.archived(ds) # TRUE # Could have achieved the same effect by: ds <- archive(ds) ## End(Not run)
Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.