https://github.com/tom-n-walker/uphill-plants-soil-carbon
Revision 84beafabeca10c7be201c8070b5bc8ef12e3255b authored by Tom Walker on 06 September 2021, 07:47:08 UTC, committed by Tom Walker on 06 September 2021, 07:47:08 UTC
1 parent bf80ebd
Tip revision: 84beafabeca10c7be201c8070b5bc8ef12e3255b authored by Tom Walker on 06 September 2021, 07:47:08 UTC
Added data processing scripts; edited .gitignore.
Added data processing scripts; edited .gitignore.
Tip revision: 84beafa
drake_plan.R
################################################################################
#### Project: SNF field experiment
#### Title: Drake plan
#### Author: Tom Walker (thomas.walker@usys.ethz.ch)
#### Date: 26 March 2021
#### ---------------------------------------------------------------------------
#### PROLOGUE ------------------------------------------------------------------
## Options ----
# remove objects from global environment
rm(list = ls())
# configure default R session options (no factors, bias against scientific #s)
options(stringsAsFactors = F,
scipen = 6)
## Libraries ----
source("packages.r")
## Code ----
sapply(list.files("./r_code",full.names = T), source)
#### PLANS ---------------------------------------------------------------------
## Load data ----
load_plan <- drake_plan(
raw_relevees = load_relevees(),
raw_soil = load_soil(),
flux_data = load_fluxes(),
full_try = load_try(),
gh_plants = load_gh_plants(),
gh_soil = load_gh_soil()
)
## Format field data ----
field_plan <- drake_plan(
cover_data = format_relevees(raw_relevees = raw_relevees),
trait_data = process_try(cover_data = cover_data, full_try = full_try),
field_data = combine_field_data(cover_data = cover_data, trait_data = trait_data, raw_soil = raw_soil),
field_data_subset = subset_field_plants(field_data = field_data)
)
#### MAKE ----------------------------------------------------------------------
## Collate plans ----
weAreGo <- bind_rows(
load_plan,
field_plan
)
## Make ----
make(weAreGo)
Computing file changes ...