to_title(c("a.string", "another_STRING"))
metric <- c("projected", "corporate_economy", "target_xyz", "else")
recode_metric_trajectory(metric)
recode_metric_techmix(metric)
spell_out_technology(c("gas", "ice", "coalcap", "hdv"))
Run the code above in your browser using DataLab