我試圖通過他們的資料和趨勢線隨時間繪制兩組。理想情況下，我希望圖例將組顯示為標題，并帶有下面的比率和趨勢線。現在圖例只顯示組而不是趨勢線。這是我的虛擬代碼：
week <- c(1,2,3,4,5,1,2,3,4,5)
hits <- c(262,698,239,195,122,160,746,283,557,239)
rate <- c(116, 134, 154, 185, 167, 216, 178, 242, 267, 234)
lower <- c(94, 111, 123, 145, 138, 196, 147, 204, 216, 176)
upper <- c(126, 167, 176, 225, 191, 245, 199, 287, 292, 267)
group <- c("A","A","A","A","A","B","B","B","B","B")
df <- data.frame(week = week, hits=hits, rate=rate, lower=lower, upper=upper,group=group)
ggplot(df, aes(x = week))
geom_line(aes(y = rate, color = group))
geom_ribbon(aes(ymin = lower, ymax = upper, fill = group),
alpha = 0.2)
geom_smooth(aes(y = rate, color = group), method = 'lm',
size = 0.5, se = FALSE, linetype = "dashed",
show.legend = TRUE)
scale_color_manual(values = c("red", "black"))
scale_fill_manual(values = c("red", "black"))
編輯 所以理想情況下，圖例看起來像這樣：
uj5u.com熱心網友回復：
我相信你想擁有
轉載請註明出處，本文鏈接：https://www.uj5u.com/houduan/338263.html