标准符号在ggplot2轴上有限制

Question

我想要的是非常简单，但很难实现：设置ggplot2()设置它们的刻度线，另外还有限制值。由于我正在处理许多数据集，我想避免自己设置滴答。

require(ggplot2)
ggplot(data=ChickWeight, aes(ChickWeight$Time)) geom_histogram(binwidth=1)

为了向轴添加max(ChickWeight$Time)，我尝试了pretty()，超出了最大值：

ggplot(data=ChickWeight, aes(ChickWeight$Time)) + geom_histogram(binwidth=1)
 + scale_x_continuous(breaks=pretty(ChickWeight$Time))

...以及pretty_breaks()，这样可以减少休息时间：

require(scales)
ggplot(data=ChickWeight, aes(ChickWeight$Time)) + geom_histogram(binwidth=1)
 + scale_x_continuous(breaks=pretty_breaks(ChickWeight$Time))

但是没有一个解决方案采用任何看起来最大的参数。然而，我的最大值是特殊的，这就是我想将它包含在图中的原因。

Answer 1

一种解决方案是将pretty()和max()组合为breaks=值，以便在最大值处设置额外的滴答。如果函数pretty()将生成大于最大值的值由于子集化，这些值不会显示。

ggplot(data=ChickWeight, aes(Time)) + geom_histogram(binwidth=1)+ 
  scale_x_continuous(breaks=c(pretty(ChickWeight$Time)[pretty(ChickWeight$Time)<max(ChickWeight$Time)],max(ChickWeight$Time)))