qplotのラベル行

Question

qplotには、それぞれ2つの従属変数を持つ5つの異なるグループ（colour = typeと表示）が表示されています。

qplot(data = data, x = day, y = var1, geom = "line", colour = type) + 
     geom_line(aes(y = var2, colour = value) 

私はVAR1を表し、その5はVAR2を表す5伝えることができるように、2つの異なる行にラベルを付けたいと思います。コマンドは次のようになります。

どうすればよいですか？

Answer 1

meltを使用してデータを「背の高い」形式に変換し、線種などの別の美しさを使用して変数を区別することができます。

# Sample data 
n <- 100 
k <- 5 
d <- data.frame(
    day = rep(1:n,k), 
    type = factor(rep(1:k, each=n)), 
    var1 = as.vector(replicate(k, cumsum(rnorm(n)))), 
    var2 = as.vector(replicate(k, cumsum(rnorm(n)))) 
) 

# Normalize the data 
library(reshape2) 
d <- melt(d, id.vars=c("day","type")) 

# Plot 
library(ggplot2) 
ggplot(d) + geom_line(aes(x=day, y=value, colour=type, linetype=variable))