1

找到解决方案。

问题:在 R 中使用 ggplot,我正在创建带有密度曲线的直方图,并希望在图中添加一些计算出的统计数据,以便我可以翻阅它们并稍后进行比较。我想在图中添加均值、标准开发、ks.test() 和其他一些变量,最好在右上角。我正在使用注释功能来执行此操作,但是如何将 x 和 y 位置设置为始终位于右上角?

这是我的代码,它把文本放在一个固定的位置,这会影响我的情节。

p <- ggplot(err, aes(x = BizTempErrors)) +
geom_histogram(aes(y = ..density..)) +
geom_density(aes(colour = "Kernal"), parse = T) +
stat_function(fun = dnorm, 
              args = list(mean(BizTempErrors), 
                          sd(BizTempErrors)), 
              aes(colour="Normal")) +
annotate("text", x = 500, y = .0011, label = "Stats to be Displayed") +
ggtitle(label = "TITLE")
plot(p)

解决方案:

d.BTE <- density(BizTempErrors)  #find max density point to get location for annotations
maxPointY <- max(d.BTE$y)
maxPointX <- max(BizTempErrors)
4

0 回答 0