Нормализовать графически данные (в процентах) ПОСЛЕ создания графически объекта в R

Question

Я пытаюсь преобразовать числовые оценки в проценты после создания сюжетного объекта.Преобразование должно выполняться после создания объекта построения (т. Е. Без преобразования входного набора данных).Кто-нибудь знает возможно ли это?

До сих пор я пытался выполнить преобразование, используя опцию "transforms" AS WELL AS, описав преобразование в параметре "y" в add_trace - но не повезло.

library(plotly)

trn <- list(
  list(
    type = "aggregate",
    groups = "x",
    aggregations = list(
      list(
        target = "y", func = "sum", enabled = T
      )
    )
  ),
  list(
    type = "groupby",
    groups = ~Age
  )
)

dta <- data.frame(
  Age = c("Young", "Old", "Young", "Old"),
  Sex = c("Female", "Female", "Male", "Male"),
  Num = c(5, 15, 10, 20)
)

p <- plot_ly() %>%
  add_trace(data = dta, type = "bar", x = ~Sex, y = ~Num, transforms = trn)

p

Используя приведенный здесь пример, результат, который я пытаюсь получить, будет иметь 25% и 75% для «Женщины» и 33% и 66% для «Мужчины»«.В основном, преобразование чисел в проценты по группам (например, пол).