ft <- flat_table('iris', iris) |>
transform_to_values(attribute = 'Characteristic',
measure = 'Value',
id_reverse = 'id')
ft <- ft |>
transform_from_values(attribute = 'Characteristic')
Run the code above in your browser using DataLab