I have a dataframe that looks like this:
library(tibble) df_of_measures <- tribble(~measure, ~meter, ~cubic_ft, ~m