Generate an phi_u graph

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.

Value

A ggplot2 graph object

Details

This function is called repeatedly from phi_u_plots_df().

machine, and destination form the title of the graph.

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")