added script

R-proj-template.Rproj

@@ -14,3 +14,7 @@ LaTeX: pdfLaTeX
 
 AutoAppendNewline: Yes
 StripTrailingWhitespace: Yes
+
+BuildType: Package
+PackageUseDevtools: Yes
+PackageInstallArgs: --no-multiarch --with-keep.source

analysis/make_tidy_cmip6.R

@@ -0,0 +1,24 @@
+library(map2tidy)
+library(dplyr)
+library(ggplot2)
+
+# list demo file path
+path <- "/data/scratch/CMIP6ng/cmip6-ng/pr/day/native/"
+
+## Precipitation ---------------
+files <- list.files(path, pattern = "pr_day", full.names = TRUE)
+
+# load and convert
+df <- map2tidy(
+  nclist = files,
+  varnam = "pr",
+  lonnam = "lon",
+  latnam = "lat",
+  timenam = "time",
+  timedimnam = "time",
+  do_chunks = TRUE,
+  outdir = "/data/scratch/CMIP6ng/cmip6_tidy/",
+  fileprefix = "pr_day_CESM2_historical_r1i1p1f1_native"
+)
+
+