ggplot2의 낮은 레벨 플롯을 사용한 여러 색상 스케일링

Question

geom_line()을 주 플롯에 추가 할 때마다 매번 '색상'을 눈금으로 추가 할 때마다 다른 색상 그라디언트를 얻고 싶습니다. 여기서 단지 예로서 데이터 프레임이다

df <- data.frame("letter"=c(rep("a",5),rep("b",5)),"x"=rep(seq(1,5),2),"y1"=c(seq(6,10),seq(6,10)/2),"y2"=c(seq(1,5),seq(1,5)/2),"y3"=c(seq(3,7),seq(3,7)/2)) 

가되는 I 제 플롯 :

y1 <- ggplot(df,aes(x=x,y=y1,colour=letter))+geom_line() 
y1 

그때 다음 I 할 수있는 Y1 및 Y2를 추가하고자

:

y2 <- geom_line(data=df,aes(x=x,y=y2,colour=letter)) 
y3 <- geom_line(data=df,aes(x=x,y=y3,colour=letter)) 
y1+y2+y3 

하지만 색상 그라디언트 (또는 색조)가 y1, y2 및 y3과 다를 수 있습니다.

geom_line에 scale_colour_hue()와 같은 것을 할당 할 수 있습니까, 아니면 ggplot에서만 가능합니까?

감사합니다. 제가 위에서 설명한 것처럼

Answer 1

, 여기에 몇 가지 옵션은 다음과 같습니다 한마디로

df <- data.frame("letter"=c(rep("a",5),rep("b",5)), 
       "x"=rep(seq(1,5),2), 
       "y1"=c(seq(6,10),seq(6,10)/2), 
       "y2"=c(seq(1,5),seq(1,5)/2), 
       "y3"=c(seq(3,7),seq(3,7)/2)) 

# melt your data and create a grouping variable 
library(plyr)      
df_m <- melt(df,id.vars = 1:2) 
df_m$grp <- with(df_m,interaction(letter,variable)) 


# Option 1 
ggplot(df_m,aes(x = x, y = value)) + 
    facet_wrap(~variable) + 
    geom_line(aes(group = letter,colour = letter)) 

# Option 2  
ggplot(df_m,aes(x = x, y = value)) + 
    geom_line(aes(group = grp,colour = letter,linetype = variable))