18

就记录而言，我有一个非常大的数据框（2 列）。我已经在ggplot2中绘制了图表。X 轴是时间，Y 轴是值。在从 50 到 60 的特定时间间隔内，我想让刻度增量更小，例如 (50,51,51,53,...59,60)。对于轴的其余部分，可以将刻度增加 10。所以，我希望 X 轴值如下：

10,20,30,40,50,51,52,53,54,55,56,57,58,58,60,70,80,90,..190,200.

我知道，我可以scale_x_continuous使用breaksand修改刻度minor_breaks。但是，我没有得到预期的输出。这是我的尝试：（注意：例如，因为我的数据非常大，所以创建了数据）。

data:
-----
x<-seq(1:200)
y<-seq(51,250,by=1)
df<-data.frame(x=x,y=y)

code:(Update based on @Didzis Elferts suggestion) 
-----
ggplot(data=df, aes(x,y))+geom_line(size=1.6)+ 
   scale_x_continuous( breaks=c(10,20,30,40,seq(50,60,by=2),seq(70,200,10))
                       ,minor_breaks=seq(50,60,by=2) )+
   +theme(axis.text.x=element_text(size=16),axis.text.y=element_text(size=16))+
   +theme(axis.title.x=element_text(size=16),axis.title.y=element_text(size=16))+ 
   +theme(axis.ticks.x = element_line(size = 1))+xlab("Time")+ylab("value")
   +theme(axis.ticks.length=unit(0.8,"cm"))

根据下面的建议，现在唯一的问题是 X 轴在 50-60 之间的值没有清楚地出现。 O/P 样本 有什么建议可以说清楚！！

4

1 回答 1

23

使用参数minor_breaks=设置次要网格线。要在 x 轴下设置数字，所有数字都应提供参数breaks=。

ggplot(data=df, aes(x,y))+geom_line(size=1.6)+ 
  scale_x_continuous(breaks=c(10,20,30,40,seq(50,60,by=1),seq(70,200,10)),
          minor_breaks=seq(50,60,by=1))

对于第二个问题 - 您设置axis.ticks.x=element_line(size=5)在内部theme()- 这会使您的轴刻度更宽，因此它们显示为小矩形。如果你想让轴刻度更长，请使用axis.ticks.length=.

+theme(axis.ticks.length=unit(0.5,"cm"))
于 2013-07-20T16:22:10.237 回答