ggplot直方图的极值

Extreme values with ggplot histogram

我正在尝试使用 ggplot() 绘制直方图,但是我无法处理极值。我希望将它们放在一个箱子中(例如称为“500 及更多”)。

我试过 scale_x_continuous(breaks = seq(0,500, by = 50)) 函数,但它只是从 x 轴上删除了标签(附在下面)关于如何处理这个问题有什么想法吗?

我建议在绘图之前计算计数。使用函数 cut(),您可以根据需要设置中断并使用 geom_bar() 绘制这些数据。在 geom_bar() 内设置 width=1 将删除条之间的 space。

library(dplyr)
library(ggplot2movies)
data("movies")
df<-movies %>% mutate(length.class=cut(length,breaks=c(seq(0,500,50),10000))) %>%
      group_by(length.class) %>% summarise(count=n())

ggplot(df,aes(length.class,count))+geom_bar(stat="identity",width=1)