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)
我正在尝试使用 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)