私はggplot2に基づいてRでプロットを得ました。残念ながら、私はプロットをアップロードするのに十分な評判がありません。次に、凡例のタイトルと2行のラベルの名前を変更します。
したがって、コードにscale_fill_continuous(name = "New Legend Title", labels=c("Control", "Treatment"))
を追加しました。
ggplot(data=descripintens,
aes(x=syear, y=workingintensity, group= treatment, colour=factor(treatment))) +
geom_line() +
xlab("Year") +
ylab("Working intensity") +
scale_fill_continuous(name = "New Legend Title", labels=c("Control", "Treatment"))
これは、stackoverflowおよびggplot2チートシートで提案されているものです。何も変わりません。エラーも発生しません。
私のコードの何が問題になっていますか?
ありがとうございました!
編集:私がプロットに使用したデータは、このコードに基づいたテーブルです:
descripintens<-intensity141516 %>%
group_by(syear, treatment) %>%
summarise(workingintensity=mean(intensity))
テーブルdescripintens
は次のようになります。
syear Treatment workingintensity
1 2014 0 96.2
2 2014 1 98.4
3 2015 0 101.00000
4 2015 1 102.00000
5 2016 0 105.9
6 2016 1 106.2
テーブルの場合:
descripintens <- data.frame(syear = rep(2014:2016, each = 2),
Treatment = rep(c(0,1), 3),
workingintensity = c(96.2, 98.4, 101, 102, 105.9, 106.2))
プロット:
ggplot(data=data,
aes(x=syear, y=working_intensity,
group= Treatment,
color=factor(Treatment))) +
geom_line() +
xlab("Year") +
ylab("Working intensity") +
scale_color_discrete(name = "New Legend Title",
labels=c("Control", "Treatment"))
まず、あなたの試みで、
scale_fill_continuous()
continuous変数に適しており、fillggplot2-にマップされています 美学 。タイプとマッピングは、使用する関数に適合している必要があります。
scale_color_discrete()