如何在ggplot2中仅显示主刻度标签，隐藏次要刻度标签？

我完全懂你的需求——只想保留1、10、100这类数量级的主刻度标签，隐藏所有次要刻度的文字标签（如果需要的话可以保留次要刻度线）。之前你移除labels=breaks没用，是因为默认情况下axis()会为所有指定的at位置生成标签，得把主、次要刻度分开处理才行。下面分基础plot和ggplot2两种场景给你具体方案：

一、基础plot解决方案 #

假设你原本的代码类似Richie Cotton的示例，我们可以手动拆分主、次要刻度：

1. 先绘制图形并暂时隐藏默认Y轴：

# 替换成你的实际数据
x <- 1:1000
y <- 1:1000
plot(x, y, log = "y", yaxt = "n") # yaxt="n" 关闭默认Y轴刻度，方便自定义

2. 设置主刻度（仅显示1、10、100这类标签）：

# 根据你的数据范围调整指数，比如0到3对应1、10、100、1000
major_breaks <- 10^(0:3)
axis(side = 2, at = major_breaks, labels = as.character(major_breaks), las = 1)
# las=1 让标签水平显示，更易读

3. 添加次要刻度线（无标签）：

# 生成2-9、20-90、200-900这类次要刻度位置
minor_breaks <- unlist(lapply(0:2, function(k) (2:9)*10^k))
axis(side = 2, at = minor_breaks, labels = FALSE, tck = -0.01)
# tck=-0.01 控制次要刻度线长度，负数表示刻度线向外延伸

这样就能实现：主刻度有清晰的文字标签，次要刻度只有线、没有多余文字干扰。

二、ggplot2解决方案 #

如果用ggplot2，同样可以精准控制刻度：

library(ggplot2)

# 示例数据，替换成你的实际数据
df <- data.frame(x = 1:1000, y = 1:1000)

ggplot(df, aes(x, y)) +
  geom_point() +
  # 设置Y轴为对数刻度，仅指定主刻度和对应标签
  scale_y_log10(
    breaks = c(1, 10, 100, 1000), # 主刻度位置
    labels = c("1", "10", "100", "1000"), # 主刻度标签
    minor_breaks = unlist(lapply(0:2, function(k) (2:9)*10^k)) # 次要刻度位置
  ) +
  # 添加对数风格的次要刻度线（左侧）
  annotation_logticks(sides = "l") +
  theme_bw()

如果不需要次要刻度线，直接去掉annotation_logticks()，同时把minor_breaks设为NULL即可。

内容的提问来源于stack exchange，提问作者Peter Rowan