映射意味着中的R

使用GGPLOT2值到計數圖我有一個數據幀，如下所示：映射意味着中的R

variable=c("D","D","C","C","C","A","B","B","B","B") 
value=c(80,100,70,68,65,45,33,31,36,32) 
Count=as.integer(c(5,10,4,5,2,7,3,5,6,2)) 
mean=c(93.3,93.3,68.2,68.2,68.2,45,33.4,33.4,33.4,33.4) 
df=data.frame(variable=variable,value=value,Count=Count,mean=mean)

我可以使一個很好的曲線圖（其中，正方形的尺寸對應於觀察的計數與該特定x值和y值），如下所示：

ggplot(df, aes(variable, value)) + geom_point(aes(size = Count), pch=15) + guides(fill=guide_legend(title="New")) + theme(legend.text=element_text(size=rel(2.3)), legend.title=element_text(size=rel(2.3), face="plain"), legend.position="right", axis.text = element_text(size=rel(2.3)), axis.title = element_text(size = rel(2.3))) + labs(x="Topic", y = "Percentage Grade")

然而，我現在要疊加的水平條的每一個的四個主題，表示平均百分比等級。這些值存儲在df $均值中。我無法弄清楚如何做到這一點。我已經嘗試用水平線選項使用geom_line（）函數......但是這似乎是繪製垂直線！

ggplot(df, aes(variable, value)) + geom_point(aes(size = Count), pch=15) + guides(fill=guide_legend(title="New")) + theme(legend.text=element_text(size=rel(2.3)), legend.title=element_text(size=rel(2.3), face="plain"), legend.position="right", axis.text = element_text(size=rel(2.3)), axis.title = element_text(size = rel(2.3))) + labs(x="Topic", y = "Percentage Grade") + geom_line(stat = "hline", yintercept = df$mean)

謝謝...

來源

2015-06-19 luckButtered

可能的[複製]（http://stackoverflow.com/questions/4244157/ggplot2-add-line-for-average-per-group） – aosmith

@aosmith謝謝。我在那篇文章之後實際上模擬了我的最後一個語法（我使用了他們所做的類似的geom_line（））。然而，區別在於我有一個平均值向量，他們使用函數來計算平均值。我不能使用它們使用的相同功能，因爲我正在爲每個可能的觀察計數，而不是每個觀察都單獨進行，就像他們所做的一樣。 – luckButtered

但是，您是否嘗試過使用'geom_errorbar'提出的答案？您可以將'yintercept = mean'放在'aes'內而不是'yintercept ='mean''外部以使用您的計算值。 – aosmith

你可以用geom_segment做到這一點：

ggplot(df, aes(variable, value)) + 
    geom_point(aes(size = Count), pch=15) + 
    geom_segment(aes(x=variable, y=mean-.1, 
        xend=variable, yend=mean+.1), 
       color="red", size=I(40))

enter image description here

來源

2015-06-19 18:44:48 tegancp

映射意味着中的R

回答

相關問題