я есть фрейм данных с несколькими значениями групп, и я хотел бы иметь блокпост для каждой категории (нарисованный вместе). Я хочу, чтобы каждый боксплот имел разную ширину, основываясь не на количестве строк в категории, а на сумме столбцов.

Например, со следующим data.frame:

Data <- data.frame(roadType = sample(c("Ramp", "Primary Street", "Highway"),100,replace=TRUE),
         drivesCount = sample(1:100,100,replace=TRUE),
        happyPercentage=sample(c(0,0.25,0.5,0.75,1),100,replace=TRUE))

Я знаю, что есть способ иметь различную ширину в зависимости от количества строк, например:

ggplot(Data, aes(x=roadType, y=happyPercentage)) +
  geom_boxplot(varwidth = TRUE, alpha=0.2) +
  theme(legend.position="none") +
  labs(x = "Road Type", y = "Happy People Percent") +
  theme(plot.title = element_text(hjust = 0.5))

Но я хочу иметь сюжет с коробкой дляhappyPercentage вroadTypeс шириной на основеdrivesCount пропорция конкретного типа дороги из общего числа дисков.

Это возможно? Как я могу это сделать?