我正在努力嘗試使用 ggplot2 制作此圖表:

到目前為止,這是我的代碼,我能夠繪制線條但不能繪制閃避條:
df <- data.frame (Month=c("A","B","C","D","D","D"),Red = c(0.08,0.06,0.04,0,0,0)
,Green =c(80,100,90,0,0,0),Purple=c(5,10,3,0,0,0),Prom =
c(0,0,0,0.06,90,3),Group=c(1,1,1,2,2,2))
ggplot(df) geom_line(aes(x=Month, y=Red, group=Group)) geom_line(aes(x=Month, y=Green,
group=Group)) geom_bar(aes(x=Month,y=Prom,group=Group,fill=as.factor(Prom)),
position="dodge",stat="identity")
我必須修改我的資料框嗎?,我需要的只是閃避部分,我能夠完成其余的情節
謝謝
uj5u.com熱心網友回復:
Group從酒吧的美學映射中洗掉變數。它正在嘗試基于此進行閃避,但所有填充都具有相同的Group,因此不會發生閃避
ggplot(df, aes(x = Month))
geom_line(aes(y = Red, group = Group))
geom_line(aes(y = Green, group = Group))
geom_col(aes(y = Prom, fill = as.factor(Prom)), position = "dodge")

這里還有幾點需要注意:
- 請記住,美學是從初始呼叫繼承的
ggplot,因此如果您的所有圖層都有x = Month,請放在aes(x = Month)初始 ggplot 呼叫中。這簡化了您的代碼,減少了重復,因此減少了錯誤蔓延的機會。 geom_bar(stat = "identity")只是一種更長的寫作方式geom_col()- 將代碼格式化為在適當的點處包含空格和換行符可以在出現問題時更容易除錯。這不是您可能假設的次要問題。從長遠來看,養成撰寫整潔易讀的代碼的習慣可以為您節省大量時間和精力。
轉載請註明出處,本文鏈接:https://www.uj5u.com/qukuanlian/443283.html
