同时使用Scale_y_Break和Scale_x_Continue时，X轴值出现两次

发布于01月09日

我画了一个y轴断裂的条形图.我想定义x轴值(我希望所有这些值都出现在绘图中)，它使用的是Scale_x_Continue函数，但这些值出现了两次.这是我的代码和情节.有什么建议吗？

library(ggplot2)
library(ggbreak)

df <- data.frame(n=c(1,2,3,4,5),
                 ratio=c(1.3,1.5,10,1.2,1.6))

head(df)

ggplot(df, aes(x=n, y=ratio)) + 
  geom_bar(stat="identity", width=0.75, fill="#2D3250") +
  scale_x_continuous(labels = as.character(df$n), breaks = df$n) +
  scale_y_break(c(2, 3), scales = 0.2, space = 0.3, expand = c(0,0))

推荐答案

至于它为什么会这样做，我不确定--似乎是一个错误.

至于修复它，您可以给scale_x_continuous一个没有中断的复制轴:

library(ggplot2)
library(ggbreak)

df <- data.frame(n=c(1,2,3,4,5),
                 ratio=c(1.3,1.5,10,1.2,1.6))

head(df)
#>   n ratio
#> 1 1   1.3
#> 2 2   1.5
#> 3 3  10.0
#> 4 4   1.2
#> 5 5   1.6

ggplot(df, aes(x=n, y=ratio)) + 
  geom_bar(stat="identity", width=0.75, fill="#2D3250") +
  scale_x_continuous(labels = as.character(df$n), breaks = df$n,  sec.axis = dup_axis(breaks = NULL)) +
  scale_y_break(c(2, 3), scales = 0.2, space = 0.3, expand = c(0,0))