У меня есть data.frame, как это:

df <- read.csv(text = "ONE,TWO,THREE
                       23,234,324
                       34,534,12
                       56,324,124
                       34,234,124
                       123,534,654")

Я хочу создать диаграмму в процентах, которая выглядит следующим образом (сделано в LibreOffice Calc):

Таким образом, столбцы должны быть стандартизированы, чтобы все стопки имели одинаковую высоту и суммировались до 100%. До сих пор все, что я смог получить, это сгруппированный барплот (не проценты), используя:

barplot(as.matrix(df))

Любая помощь?