vector_transpose_wider (data_table = germany_airpol[, -2],
names_from = 'induse',
values_from = 'value')
vector_transpose_wider (data_table = germany_airpol[1:8, 3:4],
names_from = 'induse',
values_from = 'value',
key_column_values = "CO2_emission" )
Run the code above in your browser using DataLab