ggplot 2 facet_grid“free_y”但强制Y轴舍入到最接近的整数

Question

使用时：

facet_grid(SomeGroup ~, scales="free_y") 

是否可以指定虽然您希望刻度为“空闲”，但您希望它们四舍五入到最接近的整数？

非常感谢任何帮助。

Answer 1

鉴于scale中的breaks可以使用一个函数，我想你可以将基本的破解算法包装在一个不允许非整数的函数中。

从一个例子开始：

ggplot(mtcars, aes(wt, mpg)) + 
geom_point() + 
facet_grid(am+cyl~., scales="free_y")

查看如何将scales::pretty_breaks组合在一起，创建一个包装它的函数，并且只允许整数突破：

library("scales")
integer_breaks <- function(n = 5, ...) {
  breaker <- pretty_breaks(n, ...)
  function(x) {
     breaks <- breaker(x)
     breaks[breaks == floor(breaks)]
  }
}

现在使用此函数作为比例

中的breaks函数返回

ggplot(mtcars, aes(wt, mpg)) + 
geom_point() + 
facet_grid(am+cyl~., scales="free_y") +
scale_y_continuous(breaks = integer_breaks())

Answer 2

我可能会在这里遗漏一些东西，但我会做这样的事情。

library(ggplot2)
ggplot(mtcars, aes(wt, mpg)) + 
   geom_point() + 
   facet_grid(am+cyl~., scales="free_y", space = "free_y") +
   scale_y_continuous(breaks = seq(0, 40, 2), expand = c(0, 1))