我有一个简短的 R 脚本,它使用 ggplot2 绘制了一些直方图。如何根据直方图中的最大频率(加 10%)自动设置直方图中的 ymax 限制,即
scale_y_continuous(limits= c(0,ymax*1.1)
plot = ggplot(data, aes(myo_activity)) +
geom_histogram(binwidth=0.5, aes(fill=..count..))
plot + scale_x_continuous(expand = c(0,0), limits = c(30,90)) +
scale_y_continuous(expand = c(0,0), limits = c(0,140))
最佳答案
例如使用的数据movies
因为没有提供样本数据。
带功能ggplot_build()
您可以获得包含用于绘制数据的所有元素的列表。所有数据都在列表元素 data[[1]]
中.栏目 count
此元素的值包含直方图的值。您可以使用此列的最大值为您的绘图设置限制。
plot = ggplot(movies, aes(rating)) + geom_histogram(binwidth=0.5, aes(fill=..count..))
ggplot_build(plot)$data[[1]]
fill y count x ndensity ncount density PANEL group ymin ymax xmin xmax
1 #132B43 0 0 0.75 0.0000000000 0.0000000000 0.0000000000 1 1 0 0 0.5 1.0
2 #142E48 272 272 1.25 0.0323232323 0.0323232323 0.0092535892 1 1 0 272 1.0 1.5
3 #16314B 454 454 1.75 0.0539512775 0.0539512775 0.0154453290 1 1 0 454 1.5 2.0
4 #17344F 668 668 2.25 0.0793820559 0.0793820559 0.0227257263 1 1 0 668 2.0 2.5
5 #1B3A58 1133 1133 2.75 0.1346405229 0.1346405229 0.0385452813 1 1 0 1133 2.5 3.0
plot + scale_y_continuous(expand = c(0,0),
limits=c(0,max(ggplot_build(plot)$data[[1]]$count)*1.1))
关于r - ggplot2 在直方图中查找计数最大值,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/14584093/