Rスクリプト、ggplot2とqplot、同じグラフ上の複数の時系列プロット

Question

同じプロットに複数の「線」が必要です。複数のデータポイント。

私の例では、どのように 'xa'と 'xb'データポイントを含めることができますか。

これは私がデータポイントの1つのセットに対して持っているものですが、私は2つ必要です。このスクリプトを変更するにはどうすればよいですか。

library(ggplot2) 

da <- c("2012-02-02 09:01:00", "2012-02-02 09:02:00", "2012-02-02 09:03:00") 
db <- c(0.4, 0.6, 0.5) 

xa <- c("2012-02-02 09:01:00", "2012-02-02 09:02:00", "2012-02-02 09:03:00") 
xb <- c(0.3, 0.43, 0.7) 

da2 <- as.POSIXct(da) 
dfx <- data.frame(da2, db) 

summary(dfx) 

png('time_data_errs6b.png', width=640, height=480) 
gg <- qplot(da2, db, colour='red')+ 
    opts(title = 'Requests App')+xlab('Time')+ylab('Requests') + 
    geom_line() 

print(gg) 
dev.off() 

Answer 1

私は時間変数で2 data.framesとmergeそれらになるだろう。

> df.a<-data.frame(time=da, value.a=db) 
> df.b<-data.frame(time=xa, value.b=xb) 
> df.mix<-merge(df.a, df.b, by='time') 

> df.mix 
       time value.a value.b 
1 2012-02-02 09:01:00  0.4 0.30 
2 2012-02-02 09:02:00  0.6 0.43 
3 2012-02-02 09:03:00  0.5 0.70 

あなたはそれを長いフォーマットに溶かしたように、POSIXctに変換してください。

> df.mix$time<-as.POSIXct(df.mix$time) 
> df.melt<-melt(df.mix, id.vars='time') 

ggplotの非常によく、長い形式のデータを扱い、そのプロットする前にmeltとmergeと、適切な構造にデータを取得するための通常私の目標。

> ggplot(df.melt, aes(x=time, y=value, colour=variable)) + geom_path() 

私も自分自身の読みやすさのためというよりも、qplotベースggplotを使用したいです。それは好みの問題です。

Answer 2

これは、mergeまたはmeltデータを必要とせずにはるかに簡単な方法です。

df_a <- data.frame(time = da, value = db) 
df_b <- data.frame(time = xa, value = xb) 
ggplot(df_a, aes(x = as.POSIXct(time), y = value)) + 
    geom_line(col = 'red') + 
    geom_line(col = 'blue', data = df_b)