#' @include meta.R
#' @include model.R
#' @include nm_model.R
setMethod(
f = "convert",
signature = c(target = "NmModel", source = "Model", component = "Metadata"),
definition = function(target, source, component, options) {
if (component@name == "dataset") {
target <- target + nm_data(path = component@value)
}
target
}
)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.