2021.4.25
持續(xù)更新中擎鸠。缀磕。。
參考：《R數(shù)據(jù)可視化手冊(cè)》劣光、學(xué)術(shù)數(shù)據(jù)分析及可視化
1. 單一折線圖
library(ggplot2)
library(gcookbook)
#按要求取子集
ce <- subset(cabbage_exp, Cultivar == "c39")
ggplot(ce, aes(x=Date, y=Weight, group=1))+
geom_line(color="green", size=1.5, linetype="dashed")+
geom_point(color="red", size=1.5, shape=5)+
#設(shè)置誤差棒
geom_errorbar(aes(ymin=Weight-se,ymax=Weight+se),width=0.2)
- 當(dāng)映射給X軸的是因子型變量時(shí)袜蚕，需要用在
aes()中設(shè)置group = 1，確保將所有數(shù)據(jù)劃分為一個(gè)組绢涡。se：標(biāo)準(zhǔn)誤差牲剃，指?jìng)€(gè)體間的區(qū)別；sd：標(biāo)準(zhǔn)差雄可，指樣本間的區(qū)別凿傅。誤差棒可以用標(biāo)準(zhǔn)差、標(biāo)準(zhǔn)誤差或者置信區(qū)間表示数苫，但需要寫(xiě)明用的哪一種聪舒，一般用標(biāo)準(zhǔn)差。
2. 多條折線
#保存錯(cuò)開(kāi)設(shè)置
pd <- position_dodge(0.3)
#group參數(shù)指定分布變量
ggplot(cabbage_exp,aes(x=Date, y=Weight, colour=Cultivar, group=Cultivar))+
#添加誤差棒
geom_errorbar(aes(ymin=Weight-se, ymax=Weight+se),
width=0.2, size=0.25, colour="black", position=pd)+
geom_line(position=pd)+
geom_point(position=pd, size=2.5)
group分組參數(shù)不能少
