2017-07-31 143 views
0

我想添加一個線圖到我的箱形圖,次y軸,但我不能。該怎麼辦?請幫助如何添加線圖使用次y軸,但相同的x軸的BOX圖

代碼爲我的箱形圖是:

library(ggplot2) 
mydata<-read.csv("boxplot2.csv") 
mydata$Class <- factor(mydata$Class,labels = c("1", "2", "3", "4", "5", "6")) 
p10 <- ggplot(mydata, aes(x = mydata$Class, y = log(mydata$erosion))) + 
    geom_boxplot() 
p10 
p10 <- p10 + 
    scale_x_discrete(name = "Mean Annual Precipitation(mm/yr)") +  
    scale_y_continuous(name = "Log Average Erosion Rate(m/My)") 
p10 <- ggplot(mydata, aes(x = mydata$Class, y = log(mydata$erosion))) + 
    geom_boxplot(varwidth=TRUE) 
p10 <- p10 + 
    scale_x_discrete(name = "Mean Annual Precipitation(mm/yr)") + 
    scale_y_continuous(name = "Log Average Erosion Rate(m/My)") 

我想類似的人物,但不是直方圖,我將有箱線圖

添加樣本數據 %植被侵蝕等級 0 0.43 1 0 0.81 1 2 0.26 1 3 1.05 1 3 0.97 1 12.76 15.97 2 12.84 17.69 2 11.01 14.76 2 13.44 17.94 2 10.76 10.65 2 7.28 67.47 2 23 120.4 3 21 298.63 3 52 21.4 3 9 64.94 3 50 291.88 3 16 493.98 3 11 183.45 3

+0

請提供可重複的前充足的(有一些子集或組成的數據)。你最終得到一個boxplot,因爲你做了'geom_boxplot()' - 完全是什麼問題? –

+0

我想爲我的箱形圖添加一條線圖。所以線條圖將具有secdondary y軸,並且與我的箱形圖相同的x軸 –

+0

想法是創建與上圖相同的東西,但不是直方圖,而是想要箱形圖,並且希望線圖能夠像它一樣次y軸 –

回答

0

你只需要指定geom_line不同的審美觀,像這樣:

ggplot(iris,aes(x=Species, y=Sepal.Length, fill=Species)) + 
geom_boxplot() + 
geom_line(aes(x=Species, y=Petal.Length, group=1), stat = "summary", fun.y="mean") + 
scale_y_continuous(sec.axis = sec_axis(~.)) 
相關問題