R 不显示 y 值但保留 y 轴

Question

我正在尝试重现一个情节。
这是我想重现的原始情节:

这就是我得到的:

这是我在 R 中使用的代码:

library(ggplot2)

df = read.table(sep=",",  
                header=T,   
                text="time,bits      
                    1,1
                    2,1
                    2,1
                    2,1
                    2,1
                    5,1
                    5,1
                    5,1
                    6,1
                    6,1
                    6,1
                    6,1
                    6,1
                    6,1
                    7,1
                    7,1
                    7,1
                    7,1
                    7,1
                    7,1
                    7,1
                    7,1")

mapping <- aes(
  x = (time)
)
(ggplot(data=df, mapping=mapping)
  + stat_ecdf(geom = "line")
  + geom_vline(xintercept=df$time, linetype="dotted")
  + theme_bw()
  + labs(x = "time t", y = "bits")
  + scale_x_continuous(breaks = c(1,2,5,6,7))
)

我不知道如何从 y 轴上删除值？我发现的大多数帖子都根本不显示 y 轴，我只想隐藏这些值。

Answer 1

您可以在 theme() 中做一些修改像这样:

mapping <- aes(
        x = (time)
)
(ggplot(data=df, mapping=mapping)
        + stat_ecdf(geom = "line")
        + geom_vline(xintercept=df$time, linetype="dotted")
        + theme_bw()
        + labs(x = "time t", y = "bits")
        + scale_x_continuous(breaks = c(1,2,5,6,7))
)       + theme(axis.ticks.y = element_blank(),
                axis.text.y = element_blank())