次のデータを使用して、1954 年から 2000 年までの月ごとの最高気温の変化を調べています。
わかりやすくするために、各月のアブラインのみをグラフにプロットすることにしました。私のコードは次のとおりです。
OxTemp$Month <- factor(OxTemp$Month, levels=c("January", "February", "March","April", "May", "June", "August", "September", "October", "November", "December"), ordered=TRUE)
p<-ggplot(OxTemp, aes(x=Year, y=MaxT, group=Month, colour=Season, linetype=Month))
p+geom_smooth(method = 'lm',size = 1, se = F)
これにより、次のプロットが得られます。
次の方法があるかどうか疑問に思っていました。
a) 「月」の凡例の色を「季節」の凡例の色に合わせて変更します
b) 線種がより見やすくなるように、凡例を少し広くします。
c) 各線の右側に勾配値が表示されるように、各線の勾配のラベルをプロットに追加します。
どうもありがとう！