增加轴刻度数

Question

我正在为一些数据生成图,但是滴答的数量太小,我需要更高的读数精度.

有没有办法增加ggplot2中的轴刻度数？

我知道我可以告诉ggplot使用向量作为轴刻度,但我想要的是增加所有数据的刻度数.换句话说,我希望根据数据计算滴答数.

可能ggplot在内部使用某种算法执行此操作,但我无法找到它是如何做到的,根据我的需要进行更改.

Answer 1

您可以通过修改scale_x_continuous和/或覆盖ggplots默认比例scale_y_continuous.例如:

library(ggplot2)
dat <- data.frame(x = rnorm(100), y = rnorm(100))

ggplot(dat, aes(x,y)) +
  geom_point()

给你这个:

覆盖尺度可以给你这样的东西:

ggplot(dat, aes(x,y)) +
  geom_point() +
  scale_x_continuous(breaks = round(seq(min(dat$x), max(dat$x), by = 0.5),1)) +
  scale_y_continuous(breaks = round(seq(min(dat$y), max(dat$y), by = 0.5),1))

如果您只想"缩放"绘图的特定部分,请分别查看xlim()和ylim().在这里也可以找到好的见解来理解其他论点.

Answer 2

您可以使用内置pretty_breaks功能:

ggplot(dat, aes(x,y)) + geom_point() +
scale_x_continuous(breaks = scales::pretty_breaks(n = 10)) +
scale_y_continuous(breaks = scales::pretty_breaks(n = 10))

根据Daniel Krizian的评论,您还可以使用库中的scales函数,该n函数是自动导入的:

ggplot(dat, aes(x,y)) + geom_point() +
scale_x_continuous(breaks = pretty(dat$x, n = 10)) +
scale_y_continuous(breaks = pretty(dat$y, n = 10))

您所要做的就是插入所需的刻度数.

Answer 3

您可以提供函数参数scale,ggplot将使用该函数计算刻度位置.

library(ggplot2)
dat <- data.frame(x = rnorm(100), y = rnorm(100))
number_ticks <- function(n) {function(limits) pretty(limits, n)}

ggplot(dat, aes(x,y)) +
  geom_point() +
  scale_x_continuous(breaks=number_ticks(10)) +
  scale_y_continuous(breaks=number_ticks(10))

Answer 4

从 v3.3.0 开始，ggplot2有一个选项n.breaks可以为scale_x_continuous和自动生成中断scale_y_continuous

    library(ggplot2)

    plt <- ggplot(mtcars, aes(x = mpg, y = disp)) +
      geom_point()

    plt + 
      scale_x_continuous(n.breaks = 5)

    plt + 
      scale_x_continuous(n.breaks = 10) +
      scale_y_continuous(n.breaks = 10)

Answer 5

此外，

ggplot(dat, aes(x,y)) +
geom_point() +
scale_x_continuous(breaks = seq(min(dat$x), max(dat$x), by = 0.05))

适用于分箱或离散缩放的 x 轴数据（即，不需要舍入）。