knitr::opts_chunk$set(echo = TRUE)
library(ggplot2)
library(knitr)
library(magrittr)
library(MKHthemes)
library(parsedate)
library(rprojroot)
library(PFUPipeline)
library(targets)

# Set up the root directory
root <- rprojroot::is_rstudio_project
# And the cache
cache_path <- root$find_file("_targets")

Introduction

This report shows graphs of all final energy allocations to final-to-useful machines.

Note that numbers following "##" are the row number in the allocation_graphs data frame.

alloc_plots <- targets::tar_read_raw(PFUPipeline::target_names$allocation_graphs, store = cache_path) %>% 
  magrittr::extract2("Plots")
alloc_plots[1:10]


EnergyEconomyDecoupling/PFUDatabase documentation built on Feb. 8, 2024, 8:45 a.m.