主页 / coding / 问题 / 78991845
Accepted
js4032
Asked: 2024-09-17 05:21:10 +0800 CST

geom_segment 以对数刻度出现在错误的位置

  • 772

我注意到同时使用 geom_segment 和 scale_y_log10 时出现了一些奇怪的行为。下面应该绘制一个从 (2,1) 到 (4,1) 的箭头。

ggplot(data.frame(x = 1, y = 1), aes(x, y)) +
  geom_point() +
  coord_cartesian(clip = 'off') +
  scale_x_continuous(limits = c(1, 5)) +
  scale_y_log10(breaks = c(0.1, 1, 10, 100), limits = c(0.1, 100)) +
  geom_segment(x = 2, y = 1, xend = 4, yend = 1,
               arrow = arrow(length = unit(0.5, 'cm')))

实际上，它绘制了一条从 (2,10) 到 (4,10) 的箭头。

绘图输出

经过一些实验后，似乎对数变换不适用于 geom_segment，因此无论您输入 geom_segment 的 y 值是什么，该段实际上都会绘制在 10^y 处。所以，我有两个问题：

  1. 它为什么会这样？
  2. 我该如何修复它？（最好采用比对我传递的每个 y 值取 log10() 更好的方法。）

2 个回答

  1. Best Answer

    问题与 ggplot2 获取数据、将其转换为统计数据（如果需要）然后映射到比例尺?aes_eval的步骤有关。从帮助中可以看到：“ggplot2 有三个数据阶段，您可以从中映射美学”，而您正在执行的操作跳到了最后一个阶段，缺少将输入转换为映射的步骤。

    geom_segment(y = 1...)当您在绘图中指定 时scale_y_log10()，ggplot2 会将其理解为数据属于 10^1。在 ggplot2 术语中，数据被视为在步骤中after_scale()。

    但是，您的意图是将数据映射到该比例，即您希望y = 1将其视为 10^0。如果您将其放入 中aes()，它就会这样做，将数据值 1 转换为映射到比例上的相应点。

    我们可以看到，使用aes(after_scale(y=1...))将会恢复意外行为。

    https://search.r-project.org/CRAN/refmans/ggplot2/html/aes_eval.html

    https://www.reddit.com/r/rprogramming/comments/tsspot/how_does_control_aesthetic_evaluation_work/

    ggplot(data.frame(x = rep(1,3), y = rep(1,3)), aes(x, y)) +
  geom_point() +
  coord_cartesian(clip = 'off') +
  scale_x_continuous(limits = c(1, 5)) +
  scale_y_log10(breaks = c(0.1, 1, 10, 100), limits = c(0.1, 1000)) +

  # raw data will be treated "after_scale"
  geom_segment(x = rep(2,3), y = rep(1,3), xend = rep(4,3), yend = 1:3,
               arrow = arrow(length = unit(0.2, 'cm'))) +

  # data inside  aes(after_scale(...   will be treated "after_scale"
  geom_segment(aes(x = 2, y = 1, xend = 4, yend = after_scale(1:3)),
               color = "blue",
               arrow = arrow(length = unit(0.2, 'cm'))) +

  # but data inside aes() will be mapped to the scale as we want
  geom_segment(aes(x = 2, y = 1, xend = 4, yend = 1:3),
               color = "red",
               arrow = arrow(length = unit(0.2, 'cm')))

    在此处输入图片描述

    • 2

  2. 您需要将该段的坐标映射到位置（aes()事物）。

    使用：geom_segment(aes(x = 2, y = 1, xend = 4, yend = 1), ...)。

    • 1

相关问题