From cedd515a3ee45bd6ef7400d8e69b24ff42bc6c61 Mon Sep 17 00:00:00 2001
From: Ben Anderson <dataknut@icloud.com>
Date: Thu, 17 Oct 2019 19:02:56 +1300
Subject: [PATCH] moved repo settings to new method

---
 _scripts/spatialecSettings.R | 49 ------------------------------------
 1 file changed, 49 deletions(-)
 delete mode 100644 _scripts/spatialecSettings.R

diff --git a/_scripts/spatialecSettings.R b/_scripts/spatialecSettings.R
deleted file mode 100644
index 18fb0ff..0000000
--- a/_scripts/spatialecSettings.R
+++ /dev/null
@@ -1,49 +0,0 @@
-# ------ Global SPATIALEC Settings -------
-
-# Set knitr options -----
-knitr::opts_chunk$set(echo = FALSE) # do not echo code
-knitr::opts_chunk$set(warning = TRUE)
-knitr::opts_chunk$set(message = TRUE)
-knitr::opts_chunk$set(fig_caption = TRUE)
-knitr::opts_chunk$set(fig_height = 6) # default, make it bigger to stretch vertical axis
-knitr::opts_chunk$set(fig_width = 8) # full width
-knitr::opts_chunk$set(tidy = TRUE) # tidy up code in case echo = TRUE
-
-# Local parameters ----
-sParams <- list()
-
-# > Assigns variables "sysName", "nodeName" and "userName" to global environment ----
-sysInfo <- Sys.info()
-sParams$sysName <- sysInfo[[1]]
-sParams$nodeName <- sysInfo[[4]]
-sParams$userName <- sysInfo[[7]]
-
-# > colour blind palettes for charts ----
-# http://www.cookbook-r.com/Graphs/Colors_(ggplot2)/#a-colorblind-friendly-palette
-# with grey
-sParams$cbgPalette <- c("#999999", "#E69F00", "#56B4E9", "#009E73", "#F0E442", "#0072B2", "#D55E00", "#CC79A7")
-# with black
-sParams$cbbPalette <- c("#000000", "#E69F00", "#56B4E9", "#009E73", "#F0E442", "#0072B2", "#D55E00", "#CC79A7")
-
-# NB for plots with more categories etc use the viridis library 
-# https://cran.r-project.org/web/packages/viridis/vignettes/intro-to-viridis.html
-
-# Paths ----
-# > Location of includes ----
-# Generally go at start or end of .Rmd reports
-sParams$spatialecAbout <- paste0(here::here(), "/_includes/spatialecAbout.Rmd")
-
-# > Green Grid data ----
-sParams$ggPath <- paste0("/Volumes/hum-csafe/Research Projects/GREEN Grid")
-
-# > NZ Census data ----
-sParams$dataPath <- "~/Data/NZ_Census/data/"
-
-sParams$gisPath <- "~/Data/NZ_Census/gis/"
-sParams$areasTable2013 <- paste0(sParams$gisPath, "2013/2013_Areas_Table.txt")
-
-# Metadata
-sParams$metadata <- "Marie Sklodowska-Curie Action, 'Developing methods to model local area domestic electricity demand', SPATIALEC, Grant No 700386"
-
-
-
-- 
GitLab