long_to_wide
transform data.frame from long to
wide format
long_to_wide(
df,
column_with_new_names = names(df)[1],
column_with_data = "emission",
column_fixed,
net
)
wide data.frame.
if (FALSE) { # \dontrun{
df <- data.frame(pollutant = rep(c("CO", "propadiene", "NO2"), 10),
emission = vein::Emissions(1:30),
region = rep(letters[1:2], 15))
df
long_to_wide(df)
long_to_wide(df, column_fixed = "region")
} # }