phi_u_graph: Generate an phi_u graph

In MatthewHeun/SEAPSUTWorkflow: Functions and Workflows for Primary-Final-Useful Societal Exergy Analysis Within the PSUT Framework

Generate an phi_u graph

Description

Creates an phi_u graph from a completed eta_fu table, created by the assemble_eta_fu_tables() function.

Usage

phi_u_graph(
  .df,
  countries,
  country = IEATools::iea_cols$country,
  quantity = IEATools::template_cols$quantity,
  year = IEATools::iea_cols$year,
  .values = IEATools::template_cols$.values,
  machine = IEATools::template_cols$machine,
  eu_product = IEATools::template_cols$eu_product,
  machine_eu_product = paste0(machine, "_", eu_product)
)

Arguments

.df	A data frame comprised of completed exergy-to-energy ratio values
countries	The countries for which efficiency plots are to be created.
country, year	See IEATools::iea_cols.
.values, machine, quantity, eu_product	See IEATools::template_cols.
machine_eu_product	The name of a combined machine and eu_product column.

Details

This function is called repeatedly from phi_u_plots_df().

machine, and destination form the title of the graph.

Value

A ggplot2 graph object

Examples

library(ggplot2)
# Make a simple data frame with the expected structure.
tibble::tribble(~Year, ~.values, ~Machine, ~Eu.product,
                1967, 0.5, "Cars", "MD",
                1967, 0.5, "Industry static engines", "MD",
                2020, 0.8, "Cars", "MD",
                2020, 0.2, "Industry static engines", "MD") %>%
  alloc_graph(country = "Example", ef_product = "Petrol", destination = "Transport")

MatthewHeun/SEAPSUTWorkflow documentation built on April 22, 2022, 2:21 p.m.