主页 / coding / 问题 / 79305377
Accepted
Daniel Lobo
Asked: 2024-12-24 18:50:04 +0800 CST

使用次轴时有多个灰线

  • 772

我有以下ggplot

library(ggplot2)
ggplot (structure(list(Group1 = c('A','B', 'B','A', 'B','B', 'A', 'B', 'B'), Val = c(40.707, -22.513, -3.501, -12.884, -19.668,
-5.976, -16.721, -15.838, -5.59)), row.names = c(NA, -9L), class = "data.frame"), aes (x = Group1, y = Val)) +
geom_line () +
scale_y_continuous (breaks = c(0, -22.51, 20.31, 41.72, 63.13, 84.54) ,
sec.axis = sec_axis(~.,
breaks = c(0, -22.51, 20.31, 41.72, 63.13, 84.54)))

上述代码生成以下图

在此处输入图片描述

如您所见，20.31 和 0 等点附近有多条水平网格线。

您能否帮助我们了解它们来自哪里以及如何摆脱它们？

1 个回答

  1. Best Answer

    该问题与次轴无关。额外的网格线是由于不规则（主要）中断而可见的次要网格线。您可以使用以下方法删除它们minor_breaks=NULL：

    library(ggplot2)

ggplot(structure(list(Group1 = c("A", "B", "B", "A", "B", "B", "A", "B", "B"), Val = c(
  40.707, -22.513, -3.501, -12.884, -19.668,
  -5.976, -16.721, -15.838, -5.59
)), row.names = c(NA, -9L), class = "data.frame"), aes(x = Group1, y = Val)) +
  geom_line() +
  scale_y_continuous(
    breaks = c(0, -22.51, 20.31, 41.72, 63.13, 84.54),
    sec.axis = sec_axis(~.,
      breaks = c(0, -22.51, 20.31, 41.72, 63.13, 84.54)
    ),
    minor_breaks = NULL
  )

    编辑如果您想要在休息时间的中点进行较小的休息，您可以这样做：

    library(ggplot2)

breaks = c(0, -22.51, 20.31, 41.72, 63.13, 84.54)

minor_breaks <- sort(breaks)[-1] - diff(sort(breaks)) / 2

ggplot(structure(list(Group1 = c("A", "B", "B", "A", "B", "B", "A", "B", "B"), Val = c(
  40.707, -22.513, -3.501, -12.884, -19.668,
  -5.976, -16.721, -15.838, -5.59
)), row.names = c(NA, -9L), class = "data.frame"), aes(x = Group1, y = Val)) +
  geom_line() +
  scale_y_continuous(
    breaks = breaks,
    minor_breaks = minor_breaks,
    sec.axis = sec_axis(~.,
      breaks = breaks
    )
  )

    • 0

相关问题