inst/doc/madrat.R

In madrat: May All Data be Reproducible and Transparent (MADRaT) *

## ---- echo = FALSE------------------------------------------------------------
knitr::opts_chunk$set(collapse = TRUE, comment = "#>")

## ---- echo = TRUE, eval = FALSE-----------------------------------------------
#  library(madrat)
#  cfg <- getConfig()
#  #> Initialize madrat config with default settings..
#  #> madrat mainfolder for data storage not set! Do you want to set it now? (y/n)

## ---- echo = TRUE-------------------------------------------------------------
madrat:::downloadTau

## ---- echo = TRUE, eval = FALSE-----------------------------------------------
#  downloadSource("Tau", overwrite = TRUE)

## ---- echo = TRUE-------------------------------------------------------------
madrat:::readTau

## ---- echo = TRUE, eval = FALSE-----------------------------------------------
#  x <- readSource("Tau", "paper", convert = FALSE)

## ---- echo = TRUE-------------------------------------------------------------
madrat:::convertTau

## ---- echo = TRUE, eval = FALSE-----------------------------------------------
#  x <- readSource("Tau", "paper")

## ---- echo = TRUE-------------------------------------------------------------
madrat:::calcTauTotal

## ---- echo = TRUE, eval = FALSE-----------------------------------------------
#  x <- calcOutput("TauTotal")

## ---- echo = TRUE-------------------------------------------------------------
madrat:::fullEXAMPLE

## ---- echo = TRUE, eval = FALSE-----------------------------------------------
#  retrieveData("example", rev = 1)

## ---- echo = TRUE, eval = FALSE-----------------------------------------------
#  library(madrat)
#  
#  # add global environment to madrat search path
#  setConfig(globalenv = TRUE)
#  
#  # define simple calc-function
#  calcPi <- function() {
#    out <- toolCountryFill(NULL, fill = pi)
#    return(list(x = out,
#                weight = out,
#                unit = "1",
#                description = "Just pi"))
#  }
#  
#  # run calcPi through wrapper function calcOutput
#  calcOutput("Pi")
#  

## ---- eval = FALSE------------------------------------------------------------
#  .onAttach <- function(libname, pkgname) {
#    madrat::madratAttach(pkgname)
#  }
#  
#  .onDetach <- function(libpath) {
#    madrat::madratDetach(libpath)
#  }