R/98_merging.R

## MERGING the data together!

## er, should it be a list, or a CSV?


# read all data in --------------------------------------------------------
require(readr)
datasets <- read_csv("data-raw/01_datasets.csv")
visits <-   read_csv("data-raw/01_visits.csv")
traits <-   read_csv("data-raw/13_T_matrix.csv")
bromeliads <- read.csv("data-raw/29_full_bromeliad_wide.csv", stringsAsFactors = FALSE)
abundance <- read_csv("data-raw/51_abundance.csv")
wbe <- readRDS("data-raw/81_WBE.RDS")
## This retrieves the biomass data from "bwgbiomass" and adds it as a final
## data.frame in the list
biomass <- datastorr::github_release_get(
  datastorr::github_release_info("SrivastavaLab/bwgbiomass", read = readRDS)
  )

all_data_list <- list(
  datasets   = datasets,
  visits     = visits,
  traits     = traits,
  bromeliads = bromeliads,
  abundance  = abundance,
  WBE        = wbe
  biomass    = biomass)

saveRDS(all_data_list, "~/Desktop/all_data.rds")
SrivastavaLab/cesabfunctionalwebsdata documentation built on May 9, 2019, 1:55 p.m.