0

時系列データをプロットしたいのですが、何らかの理由で明確にプロットできません。私はこの機能を使用します：

plot(temperature~month*area, data=mydata)

しかし、この関数は領域を分離しません。

私の例は次のとおりです。

            area    month   temperature
              d1    november    18,723
              d1    november    16,963
              d1    november    22,753
              d1    november    30,495
              d1    november    26,818
              d1    november    22,944
              i1    november    18,485
              i1    november    17,368
              i1    november    16,844
              i1    november    24,171
              i1    november    28,072
              i1    november    28,766
              i1    november    25,744
              i1    november    22,920
              c1    november    17,272
              c1    november    16,225
              c1    november    16,058
              c1    november    22,920
              c1    november    28,642
              c1    november    26,256
              d1    december    17,558
              d1    december    28,468
              d1    december    21,318
              i1    december    21,246
              i1    december    20,103
              c1    december    27,776
              c1    december    21,652
              c1    december    19,793
              c1    december    18,628
              c1    december    17,796
4

1 に答える 1

1

あなたのデータは少し奇妙です。日付は 2 つしかありません。3 つのエリアのそれぞれに、これらの日付の複数の臨時雇用者がいます。ライン プロットを使用してもほとんど意味がありません。次のコードは、エリアごとにグループ化された散布図を提供します。ライブラリ ggplot2 を使用して、グループごとにプロットします。

dat <- read.table(
  header=TRUE, text='area day_month_year temperature 
d1 09_11_2013 18,723 
d1 09_11_2013 17,558 
d1 09_11_2013 16,963 
d1 09_11_2013 22,753 
d1 09_11_2013 28,468 
d1 09_11_2013 30,495 
d1 09_11_2013 26,818 
d1 09_11_2013 22,944 
d1 10_11_2013 21,318 
i1 09_11_2013 18,485 
i1 09_11_2013 17,368 
i1 09_11_2013 16,844 
i1 09_11_2013 24,171 
i1 09_11_2013 28,072 
i1 09_11_2013 28,766 
i1 09_11_2013 25,744 
i1 09_11_2013 22,920 
i1 10_11_2013 21,246 
i1 10_11_2013 20,103 
c1 09_11_2013 17,272 
c1 09_11_2013 16,225 
c1 09_11_2013 16,058 
c1 09_11_2013 22,920 
c1 09_11_2013 27,776 
c1 09_11_2013 28,642 
c1 09_11_2013 26,256 
c1 09_11_2013 21,652 
c1 10_11_2013 19,793 
c1 10_11_2013 18,628 
c1 10_11_2013 17,796')

# convert temp to numeric data
dat$temp=as.numeric(gsub(',','.',dat$temp))

# convert day_month_year to date and add to dataframe
dat$date=as.Date(dat$day_month_year,"%d_%m_%Y")

# scatter plot by group
library(ggplot2)
ggplot(dat, aes(x=date, y=temp, colour=area, group=area)) + geom_point()

データの日付の形式が変更されたことに注意してください。このソリューションでは、元の形式が使用されます。月の名前で新しい形式を引き続き使用する場合は、as.Date キャストを変更する必要があります。

于 2015-06-19T19:56:50.783 に答える