Nothing
ncdump <- function(filename, args = "-h"){
cmd <- paste("ncdump", args, filename, sep = " ")
if(is.loaded("spmd_initialize", PACKAGE = "pbdMPI")){
if(pbdMPI::comm.rank() == 0){
system(cmd)
}
} else{
system(cmd)
}
invisible()
}
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.