如何使用ggbreak在使用ggplot创建的带有分裂轴的图上保持轴配置？

huangapple
go评论88阅读模式
英文:

How to keep the axis configuration on a plot made with ggplot with split axes using ggbreak?

问题

当使用 ggbreak 分割 x 轴时，图表显示正确。但是，如果我指定 y 轴的刻度，y 轴不会显示为没有指定时的样子。我该如何解决这个问题？

  1.     library(ggplot2)
  2.     library(ggbreak)
  3.     
  4.     DF <- data.frame(x = 1:40,
  5.                      y = c(rnorm(n = 10,
  6.                                  mean = 1000,
  7.                                  sd = 250),
  8.                            rnorm(n = 10,
  9.                                  mean = 200,
  10.                                  sd = 10),
  11.                            rnorm(n = 10,
  12.                                  mean = 1000,
  13.                                  sd = 250),
  14.                            rnorm(n = 10,
  15.                                  mean = 200,
  16.                                  sd = 10)))
  17.     
  18.     # 无对数轴
  19.     
  20.     ggplot(data = DF,
  21.            aes(x = x,
  22.                y = y)) +
  23.       geom_point() +
  24.       scale_x_break(breaks = c(10, 20),
  25.                     scales = "free")

注意，这里 y 轴被打印两次，不符合预期。

  1.     # 有对数轴
  2.     
  3.     ggplot(data = DF,
  4.            aes(x = x,
  5.                y = y)) +
  6.       geom_point() +
  7.       scale_y_log10(name = "y 轴",
  8.                     limits = c(0.1, 10000),
  9.                     breaks = c(0.1, 1, 10, 100, 1000, 10000),
  10.                     labels = c(expression(10^-1),
  11.                                expression(10^0),
  12.                                expression(10^1),
  13.                                expression(10^2),
  14.                                expression(10^3),
  15.                                expression(10^4))) +
  16.       scale_x_break(breaks = c(10, 20),
  17.                     scales = "free")
英文:

When I split the x-axis using ggbreak, the plot is displayed correctly. However, if I specify the scale of the y-axis, the y-axis is not displayed as it would be without the specification. How can I solve this?

  1. library(ggplot2)
  2. library(ggbreak)
  4. DF &lt;- data.frame(x = 1:40,
  5.                  y = c(rnorm(n = 10,
  6.                              mean = 1000,
  7.                              sd = 250),
  8.                        rnorm(n = 10,
  9.                              mean = 200,
  10.                              sd = 10),
  11.                        rnorm(n = 10,
  12.                              mean = 1000,
  13.                              sd = 250),
  14.                        rnorm(n = 10,
  15.                              mean = 200,
  16.                              sd = 10)))
  18. # Without log axis
  20. ggplot(data = DF,
  21.        aes(x = x,
  22.            y = y)) +
  23.   geom_point() +
  24.   scale_x_break(breaks = c(10, 20),
  25.                 scales = &quot;free&quot;)

如何使用ggbreak在使用ggplot创建的带有分裂轴的图上保持轴配置？

Note that here the y-axis is printed twice, unlike as desired.

  1. # With log axis
  3. ggplot(data = DF,
  4.        aes(x = x,
  5.            y = y)) +
  6.   geom_point() +
  7.   scale_y_log10(name = &quot;y-axis&quot;,
  8.                 limits = c(0.1, 10000),
  9.                 breaks = c(0.1, 1, 10, 100, 1000, 10000),
  10.                 labels = c(expression(10^-1),
  11.                            expression(10^0),
  12.                            expression(10^1),
  13.                            expression(10^2),
  14.                            expression(10^3),
  15.                            expression(10^4))) +
  16.   scale_x_break(breaks = c(10, 20),
  17.                 scales = &quot;free&quot;)

如何使用ggbreak在使用ggplot创建的带有分裂轴的图上保持轴配置？

答案1

得分: 1

Here is the translated code snippet:

尽管这看起来像是一个错误，但一个解决方法是明确指定一个重复的轴，然后删除 breaks、labels 和 name：

  1. library(ggplot2)
  2. library(ggbreak)
  4. set.seed(123)
  6. ggplot(
  7.   data = DF,
  8.   aes(
  9.     x = x,
  10.     y = y
  11.   )
  12. ) +
  13.   geom_point() +
  14.   scale_y_log10(
  15.     name = "y轴",
  16.     limits = c(0.1, 10000),
  17.     breaks = c(0.1, 1, 10, 100, 1000, 10000),
  18.     labels = c(
  19.       expression(10^-1),
  20.       expression(10^0),
  21.       expression(10^1),
  22.       expression(10^2),
  23.       expression(10^3),
  24.       expression(10^4)
  25.     ),
  26.     sec.axis = dup_axis(breaks = NULL, labels = NULL, name = NULL)
  27.   ) +
  28.   scale_x_break(breaks = c(10, 20), scales = "free")

如何使用ggbreak在使用ggplot创建的带有分裂轴的图上保持轴配置？

英文:

While this looks like a bug to me, a workaround would be to explicitly specify a duplicated axis for which you remove the breaks, labels and the name:

  1. library(ggplot2)
  2. library(ggbreak)
  4. set.seed(123)
  6. ggplot(
  7.   data = DF,
  8.   aes(
  9.     x = x,
  10.     y = y
  11.   )
  12. ) +
  13.   geom_point() +
  14.   scale_y_log10(
  15.     name = &quot;y-axis&quot;,
  16.     limits = c(0.1, 10000),
  17.     breaks = c(0.1, 1, 10, 100, 1000, 10000),
  18.     labels = c(
  19.       expression(10^-1),
  20.       expression(10^0),
  21.       expression(10^1),
  22.       expression(10^2),
  23.       expression(10^3),
  24.       expression(10^4)
  25.     ),
  26.     sec.axis = dup_axis(breaks = NULL, labels = NULL, name = NULL)
  27.   ) +
  28.   scale_x_break(breaks = c(10, 20), scales = &quot;free&quot;)

如何使用ggbreak在使用ggplot创建的带有分裂轴的图上保持轴配置？

huangapple
  • 本文由 发表于 2023年4月17日 22:22:38
  • 转载请务必保留本文链接：https://go.coder-hub.com/76036174.html
  • axis
  • ggbreak
  • ggplot2
  • r
  • split
匿名

发表评论

匿名网友

:?: :razz: :sad: :evil: :!: :smile: :oops: :grin: :eek: :shock: :???: :cool: :lol: :mad: :twisted: :roll: :wink: :idea: :arrow: :neutral: :cry: :mrgreen:

确定