作者paranoia5201 (社會黑暗、行路難)
看板R_Language
標題[問題] 改趨勢圖中的legand
時間Thu Jan 11 10:20:43 2018
[問題類型]:
程式諮詢(我想用R 做某件事情，但是我不知道要怎麼用R 寫出來)
[軟體熟悉度]:
入門(寫過其他程式，只是對語法不熟悉)
[問題敘述]:
我用以下語法要展現出各疾病(type)的歷年發生趨勢。
但是想不到要怎麼改圖像中legand裡的label。
所以想請教要怎麼寫。
感謝指導～
[程式範例]:
d_yearly1 # 各疾病資料歷年資料
# 資料的模樣
> head(d_yearly1)
year type ADJ_R TotalCase AgeMedian
1 2001 140_9 15.06 3588 51
2 2001 150 5.38 1257 62
3 2001 151 14.79 3502 70
4 2001 153_4 32.56 7640 67
5 2001 155 39.30 9122 63
6 2001 162 30.08 7062 70
# 作趨勢圖的語法
ggplot(d_yearly1, aes(x=year, y=ADJ_R, group = type)) +
geom_line(aes(color=type))+
geom_point(aes(color=type))+
theme(legend.position="right")
### 圖片做出來的legand裡的label，羅列著140_9、150、151、153_4、155、162等...
### 我想把上述label改成各個疾病名稱......
### 如果有可能把label名稱直接放在線的尾端，也可以教一下怎麼放嗎？感謝。
[環境敘述]:
Rstudio
library(tidyverse)
library(ggplot2)
[關鍵字]:
製圖、視覺化
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 210.241.78.121
※ 文章網址: https://webptt.com/m.aspx?n=bbs/R_Language/M.1515637245.A.C9F.html
※ 編輯: paranoia5201 (210.241.78.121), 01/11/2018 10:26:19
1F：→ F0011010101: +scale_color_discrete(labels = c("病名","病名")) 01/11 11:34
2F：推 cywhale: 如果線和label很多可考慮用ggrepel套件 geom_text_repel 01/11 16:04
3F：→ cywhale: 標的y位置可以抓max(趨勢值), label就是 病名的vector X 01/11 16:10
4F：→ cywhale: X[match(data$type, X)] 就會套到正確的病名 01/11 16:11