ggplot2 막대 그래프의 색상을 수동으로 채우는 방법

Question

막대 그래프를 생성 중이며 특정 색상으로 특정 그룹의 색상을 지정하고 싶습니다. 여기 내 히스토그램 :

내가 14 개 그룹이 내가 처음 7 빨간색, 다음 4 블루, 최종 3 오렌지 색상을하고 싶습니다. ggplot에서 이것을 어떻게 할 수 있습니까? 감사.

Answer 1

업데이트 된 버전

그룹화 열을 지정할 필요가 없습니다, ggplot 명령은 훨씬 더 컴팩트.

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) 

이전 버전

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)