Cách điền màu theo cách thủ công vào biểu đồ ggplot2

Question

Tôi đang tạo biểu đồ và tôi muốn tô màu các nhóm nhất định với các màu cụ thể. Dưới đây là biểu đồ của tôi:

Tôi có 14 nhóm và tôi muốn màu 7 màu đỏ đầu tiên, 4 màu xanh bên cạnh, và trận chung kết 3 màu da cam. Làm thế nào tôi có thể làm điều này trong ggplot? Cảm ơn.

Answer 1

CẬP NHẬT PHIÊN BẢN

Không cần phải chỉ định cột nhóm, ggplot lệnh là nhiều hơn nữa compact.

library(ggplot2) 
set.seed(1234) 

# Data generating block 
df <- data.frame(x=sample(1:14, 1000, replace=T)) 
# Colors 
colors <- c(rep("red",7), rep("blue",4), rep("orange",3)) 

ggplot(df, aes(x=x)) + 
    geom_histogram(fill=colors) + 
    scale_x_discrete(limits=1:14) 

OLD VERSION

library(ggplot2) 

# 
# Data generating block 
# 
df <- data.frame(x=sample(c(1:14), 1000, replace=TRUE)) 
df$group <- ifelse(df$x<=7, 1, ifelse(df$x<=11, 2, 3)) 

# 
# Plotting 
# 
ggplot(df, aes(x=x)) + 
    geom_histogram(data=subset(df,group==1), fill="red") + 
    geom_histogram(data=subset(df,group==2), fill="blue") + 
    geom_histogram(data=subset(df,group==3), fill="orange") + 
    scale_x_discrete(breaks=df$x, labels=df$x)