#' @importFrom magclass read.magpie
readREMMAG <- function(subtype) {
files <- c(ghgprices="ghg_prices.mz",
biodem="2ndgen_biodem.mz")
file <- toolSubtypeSelect(subtype,files)
return(read.magpie(file))
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.