Nothing
#' NetCDF sources
#'
#' A record of file, URL, or any data source with NetCDF.
#' @param x data source string
#'
#' @param ... ignored
#'
#' @name nc_sources
#' @export
nc_sources <- function(x, ...) {
UseMethod("nc_sources")
}
#' @name nc_sources
#' @export
nc_sources.character <- function(x, ...) {
if (file.exists(x)) {
path <- normalizePath(x, winslash = "/")
} else {
path <- x
}
tibble(access = Sys.time(), source = path)
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.