[英]Include overall average in R Grouped ggplot2
我只是在學習R,最后在工作中有一項我可以使用的任務! 但是,我對我認為應該是一件相當容易/普通的事情感到困惑。
我有生成下面的圖的R代碼
ggplot(data = subset(AverageHoldingTimes, CallPriority==1 & AverageCreatedToDispatct > 0 & CallCreatedHour %in% c(0,1,2,3,4,5,6,7)), mapping = aes(x=CallDate, y=AverageCreatedToDispatct)) +
geom_smooth(se = FALSE, mapping = aes(color = AreaCommand)) +
geom_smooth(se = FALSE, linetype = 2, color='red') +
geom_vline(xintercept = as.POSIXct(as.Date(c("2016-09-15", "2017-08-15"))), linetype=4) +
labs(y = "Average Number of Minutes to Dispatch", title = "Priority 1 Call Average Number of Minutes to Dispatch Midnight To 8 AM", x = "Call Date") +
scale_colour_hue(name="Area Command", labels=c("FootHills", "NorthEast", "NorthWest", "SouthEast", "SouthWest", "Valley"), guide = guide_legend(override.aes = list(linetype = c(1, 1, 1, 1, 1, 1))))
我希望將紅色虛線(優先級1通話的總體平均值)包括在圖例中。 我需要更改/添加什么才能將其包括在內?
另外,有沒有辦法在垂直線上添加標簽或文本?
為了使ggplot
在圖例中包括一個geom層,它需要映射一些aes()
。 這不必是data
一列,我們可以將任何標簽分配為字符串。 我們將在此處使用“平均值”:
ggplot(mtcars, aes(wt, mpg)) +
geom_smooth(se = FALSE, aes(color = as.factor(cyl), linetype = as.factor(cyl))) +
geom_smooth(se = FALSE, aes(group = NULL, color = "average", linetype = "average")) +
scale_color_manual(values = c("red","green","blue","black"), name = "Area Command") +
scale_linetype_manual(values = c(1,1,1,3), name = "Area Command")
scale_x_manual()
用來設置值並將圖例折疊到單個框中,因此, linetype
和color
共享單個圖例框,而不是單獨的圖例框。
聲明:本站的技術帖子網頁,遵循CC BY-SA 4.0協議,如果您需要轉載,請注明本站網址或者原文地址。任何問題請咨詢:yoyou2525@163.com.