[问题] 改趋势图中的legand

楼主: paranoia5201 (迈向研究生)   2018-01-11 10:20:43
[问题类型]:
程式咨询(我想用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)
[关键字]:
制图、视觉化
作者: F0011010101 (法客)   2018-01-11 11:34:00
+scale_color_discrete(labels = c("病名","病名"))
作者: cywhale (cywhale)   2018-01-11 16:04:00
如果线和label很多可考虑用ggrepel套件 geom_text_repel标的y位置可以抓max(趋势值), label就是 病名的vector XX[match(data$type, X)] 就会套到正确的病名

Links booklink

Contact Us: admin [ a t ] ucptt.com