如何在ggplot2中断开轴?

时间:2017-11-08 17:36:07

标签: r ggplot2 graph

在R

我的y轴上有ageadjustet发病率,我想在x轴上绘制它们与日历年的关系。

我必须遵循:

library(ggplot2)

kkj <- ggplot(d, aes(d$year)) + theme_bw() +
  geom_line(aes(y=d$aair.pap), colour="red") +  
  geom_line(aes(y=d$aair.fol), colour="green") +
  geom_line(aes(y=d$aair.ana), colour="yellow") +
  geom_line(aes(y=d$aair.med), colour="black") 

kkj1 <- kkj + ylab("Ageadjustet IR") + xlab("Years") 

kkj1

我的年龄发病率介于0.00和5.00之间,我的日历年份介于1980年至2014年之间。

我希望将y轴折断0.25,将x轴折断5年。似乎无法弄明白 - 你能帮忙吗?

好的 - 所以这很有效:

library(ggplot2)

kkj <- ggplot(d, aes(d$year)) + theme_bw() +
  geom_line(aes(y=d$aair.pap), colour="red") +  
  geom_line(aes(y=d$aair.fol), colour="green") +
  geom_line(aes(y=d$aair.ana), colour="yellow") +
  geom_line(aes(y=d$aair.med), colour="black") 

kkj1 <- kkj + scale_x_continuous(name="Years",breaks = c(1980, 1985, 
1990, 1995, 2000, 2005, 2010, 2015), limits = c(1980,2015))+ 
scale_y_continuous(name="Ageadjustet incidence rates per 
100.000",breaks 
=c(0.25,0.5,0.75,1,1.25,1.5,1.75,2,2.25,2.5,2.75,3,3.25,3.5,3.75,4), 
limits = c(0,4))

如何在我的情节中添加标签,红色,绿色,黄色和黑色&#34; -line;&#34;乳头状癌,滤泡癌,间变性癌和髓样癌&#34; ? 下进行。

0 个答案:

没有答案