r - 如何沿数字 x 轴值在 x 轴上专门添加文本项

Question

我的 x 轴值（天数）范围从 -1 到 300，代码是这样的

scale_x_continuous(breaks = scales::pretty_breaks(n = 10),limits=c(-1,290))

如何将 0 标记为“基线”，其余值没有变化，仅标记值 0？

目前剧情是这样的：

标签： rggplot2plot

Answer 1

据我了解您的问题，您正在寻求有关如何标记x=0为的答案Baseline，而其余部分x-axis label text应保持原样。

数据样本

set.seed(1)
df <- data.frame(y=sample(1:17,1000, replace=TRUE), x=sample(-1:300, 1000, replace=TRUE))

给

ggplot(df, aes(x=x, y=y=))

要手动更改x-axis text，您可以申请paste0

ggplot(df, aes(x=x, y=y)) +
  scale_x_continuous(breaks = seq(0,300,50),
                     labels = c(paste0("Baseline"), paste0(seq(50,300,50))))

这使