Как сделать блокпост с подмножеством значений и всеми значениями на одном графике?

Question

Я работаю с базовым R сюжетом.

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

Party <- rep(c("Rep", "Dem", "Ind"), 50)
Values <- sample(1:100, size = length(Party), replace = T)

hw <- data.frame(Party, Values)

#Plot 1
boxplot(hw$Values, 
        col=c("green"),
        xlab = "All Respondents")
#Plot 2
boxplot(hw$Values~hw$Party, 
        col=c("blue", "purple", "red"),
        xlab = "Partisan Respondents")

Я бы хотел, чтобы график 1 и график 2 были объединены в один график.

Любая помощь, которую вы могли бы предложить, была бы очень полезной. оценили. Спасибо!

Answer 1

Это простой способ добавить все значения группы.

library(dplyr)   # edited line

hw2 <- hw %>% 
  bind_rows(hw %>% mutate(Party = "ALL"))

boxplot(Values ~ Party, data = hw2,
        col = c("gray60", "blue", "purple", "red"),
        xlab = "Partisan Respondents")