diff --git a/R/dat_proc.R b/R/dat_proc.R
index e69de29..a2973e9 100644
--- a/R/dat_proc.R
+++ b/R/dat_proc.R
@@ -0,0 +1,16 @@
+library(tidyverse)
+library(here)
+
+# pull data from hmpu-workflow repo -----------------------------------------------------------
+
+load(url("https://github.com/tbep-tech/hmpu-workflow/raw/master/data/acres.RData"))
+load(url("https://github.com/tbep-tech/hmpu-workflow/raw/master/data/subtacres.RData"))
+load(url("https://github.com/tbep-tech/hmpu-workflow/raw/master/data/chgdat.RData"))
+load(url("https://github.com/tbep-tech/hmpu-workflow/raw/master/data/subtchgdat.RData"))
+fluccs <- read.csv('https://github.com/tbep-tech/hmpu-workflow/raw/master/data/FLUCCShabsclass.csv', stringsAsFactors = F)
+
+save(acres, file = here('data/acres.RData'))
+save(subtacres, file = here('data/subtacres.RData'))
+save(chgdat, file = here('data/chgdat.RData'))
+save(subtchgdat, file = here('data/subtchgdat.RData'))
+save(fluccs, file = here('data/fluccs.RData'))
diff --git a/data/acres.RData b/data/acres.RData
new file mode 100644
index 0000000..4fbbc0c
Binary files /dev/null and b/data/acres.RData differ
diff --git a/data/chgdat.RData b/data/chgdat.RData
new file mode 100644
index 0000000..c1fdaae
Binary files /dev/null and b/data/chgdat.RData differ
diff --git a/data/fluccs.RData b/data/fluccs.RData
new file mode 100644
index 0000000..4cf8469
Binary files /dev/null and b/data/fluccs.RData differ
diff --git a/data/subtacres.RData b/data/subtacres.RData
new file mode 100644
index 0000000..5510e78
Binary files /dev/null and b/data/subtacres.RData differ
diff --git a/data/subtchgdat.RData b/data/subtchgdat.RData
new file mode 100644
index 0000000..4dde332
Binary files /dev/null and b/data/subtchgdat.RData differ
diff --git a/index.Rmd b/index.Rmd
index 6c5e2b3..246fd79 100644
--- a/index.Rmd
+++ b/index.Rmd
@@ -4,10 +4,11 @@ output:
     includes: 
       in_header: google-analytics.html
 css: styles.css
+title: "LAND USE CHANGES"
 runtime: shiny
 ---
   
-# LAND USE CHANGES {.tabset}
+# {.tabset}
   
 ```{r setup, message = F, warning = F, results = 'hide', echo = FALSE}
 knitr::opts_chunk$set(echo = TRUE, warning = F, message = F, echo = F, fig.path = 'figs/', dev.args = list(family = 'serif'), fig.path = 'figures/')
@@ -22,11 +23,11 @@ library(shiny)
 library(shinyWidgets)
 library(reactablefmtr)
 
-load(url("https://github.com/tbep-tech/hmpu-workflow/raw/master/data/acres.RData"))
-load(url("https://github.com/tbep-tech/hmpu-workflow/raw/master/data/subtacres.RData"))
-load(url("https://github.com/tbep-tech/hmpu-workflow/raw/master/data/chgdat.RData"))
-load(url("https://github.com/tbep-tech/hmpu-workflow/raw/master/data/subtchgdat.RData"))
-fluccs <- read.csv('https://github.com/tbep-tech/hmpu-workflow/raw/master/data/FLUCCShabsclass.csv', stringsAsFactors = F)
+data(acres)
+data(subtacres)
+data(chgdat)
+data(subtchgdat)
+data(flucss)
 
 source('R/funcs.R')