-2

2セットの時系列データがあります。それらを1つのプロットにプロットしたいと思います。さらに、プロットは-3から15までのy軸の固定スケールである必要があり、aとbを示します。ここで、x軸は時刻と日付、y軸はv1です。

データa：TimeAndDate v1

1  2007-09-30 00:00:00 0.3460000
2  2007-09-30 01:00:00 0.1660000
3  2007-09-30 02:00:00 0.2066667
4  2007-09-30 03:00:00 0.2956667
5  2007-09-30 04:00:00 0.2220000
6  2007-09-30 05:00:00 0.6090000
7  2007-09-30 06:00:00 0.8480000
8  2007-09-30 07:00:00 1.1986667
9  2007-09-30 08:00:00 1.4696667
10 2007-09-30 09:00:00 1.6280000

データb：TimeAndDate v1

1  2007-09-29 00:00:00 -1.3250000
2  2007-09-29 01:00:00 -0.4670000
3  2007-09-29 02:00:00 -0.4426667
4  2007-09-29 03:00:00 -0.6396667
5  2007-09-29 04:00:00 -0.7843333
6  2007-09-29 05:00:00 -0.5563333
7  2007-09-29 06:00:00 -0.7276667
8  2007-09-29 07:00:00 -0.6260000
9  2007-09-29 08:00:00 -0.7290000
10 2007-09-29 09:00:00  0.4976667

推測される結果：

プロット

コードによって一時としてデータをマージしました：

 temp <- data.frame(HMn29_29$avg_val,HMn28_29$avg_val,HMn29_29$h)


   HMn29_29.avg_val HMn28_29.avg_val          HMn29_29.h
1        -1.3250000       -1.9225000 2007-09-29 00:00:00
2        -0.4670000       -1.6676667 2007-09-29 01:00:00
3        -0.4426667       -1.5820000 2007-09-29 02:00:00
4        -0.6396667       -1.5716667 2007-09-29 03:00:00
5        -0.7843333       -1.8290000 2007-09-29 04:00:00
6        -0.5563333       -1.6153333 2007-09-29 05:00:00
7        -0.7276667       -1.8093333 2007-09-29 06:00:00
8        -0.6260000       -1.9303333 2007-09-29 07:00:00
9        -0.7290000       -1.3980000 2007-09-29 08:00:00
10        0.4976667        1.2270000 2007-09-29 09:00:00

プロットコード：

ggplot(temp, aes( HMn29_29.h)) + 
+     geom_line(aes(y = HMn28_29.avg_val, colour = "var0")) + 
+     geom_line(aes(y = HMn29_29.avg_val, colour = "var1"))

y軸を-3から15に固定するにはどうすればよいですか？

4

2 に答える 2

1

テーブルを1つのテーブルに配置する：

 temp <- data.frame(HMn29_29$avg_val,HMn28_29$avg_val,HMn29_29$h)

プロット：

temp <- data.frame(HMn29_29$avg_val,HMn28_29$avg_val,HMn29_29$h)
ggplot(temp, aes( HMn29_29.h)) + ylim(-2,13)+
     geom_line(aes(y = HMn28_29.avg_val, colour = "Temprature")) + 
    geom_line(aes(y = HMn29_29.avg_val, colour = "TempratureA"))+ opts(title = 'chart_title')

結果：

ここに画像の説明を入力してください

于 2013-01-11T17:06:43.930 に答える
1

私はあなたが望むもののためにここで暗闇の中で突き刺しているので、ここに行きます：

データセットを単一のデータ フレーム (df) にマージしました。

date time dose data
2007-09-30 00:00:00 0.3460000 A
2007-09-30 01:00:00 0.1660000 A
2007-09-30 02:00:00 0.2066667 A
2007-09-30 03:00:00 0.2956667 A
2007-09-30 04:00:00 0.2220000 A
2007-09-30 05:00:00 0.6090000 A
2007-09-30 06:00:00 0.8480000 A
2007-09-30 07:00:00 1.1986667 A
2007-09-30 08:00:00 1.4696667 A
2007-09-30 09:00:00 1.6280000 A
2007-09-29 00:00:00 -1.3250000 B
2007-09-29 01:00:00 -0.4670000 B
2007-09-29 02:00:00 -0.4426667 B
2007-09-29 03:00:00 -0.6396667 B
2007-09-29 04:00:00 -0.7843333 B
2007-09-29 05:00:00 -0.5563333 B
2007-09-29 06:00:00 -0.7276667 B
2007-09-29 07:00:00 -0.6260000 B
2007-09-29 08:00:00 -0.7290000 B
2007-09-29 09:00:00  0.4976667 B

次に、次のコードでプロットしました。

ggplot(data=df, aes(x=time, y=dose, group=data, colour=data)) + geom_line() + geom_point()

これにより、次の結果が得られます。 ここに画像の説明を入力

使用する必要がある軸の範囲を変更したい場合はxlim()、ylim()

于 2013-01-11T16:32:59.477 に答える