Question

y <- c(2, 15, 8, 20,3,4, 7)
x <- c(2015, 2016, 2017, 2018, 2019, 2020, 2021)
dat <-data.frame(x,y)

p<-ggplot(dat, aes(x,y, label=y))+ geom_line()+xlab("") + ylab("")+ 
theme(axis.text.y = element_text(face='bold',size=24),axis.text.x=     element_text(face='bold', size=20))+
scale_y_continuous("", limits=c(0,30))+xlab("")+theme_bw()+geom_text(vjust=-1, colour="purple")

运行此代码后，仅在2016年，2018年，2020年显示在x轴上。我想将所有x <- c(2015, 2016, 2017, 2018, 2019, 2020, 2021)写入图表。

我应该使用哪个命令？在y轴上，我想显示0,5,10,15,20,25,20而不是0,10,20,30。

Answer 1

要扩展Gregor的评论，您需要在breaks函数中使用scale命令，例如scale_x_continuous：

scale_x_continuous(breaks = 2015:2021)

所以你的情节命令就是

p + scale_x_continuous(breaks = 2015:2021) +
    scale_y_continuous(breaks = seq(0,20, by = 5))

如何自己将数字放在y轴的x轴上？

1 个答案: