R/ncdump.r

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()
}

Try the pbdNCDF4 package in your browser

Any scripts or data that you put into this service are public.

pbdNCDF4 documentation built on May 2, 2019, 6:43 a.m.