ggplot中log10轴的数字格式设置：精度与小数点符号问题

核心说明 #

不能叠加多个scale_x_continuous，ggplot仅会生效最后一个刻度配置，所有格式调整必须在同一个scale_x_continuous内完成。

方案1：保留e^.x数学表达式格式 #

如果需要维持原有的指数形式标签，同时调整指数部分的小数位数和小数点符号，可自定义标签函数：

library(tidyverse)

mtcars %>% ggplot(aes(x=mpg, y=disp))+
  geom_point() +
  scale_x_continuous(
    trans = log_trans(),
    breaks = trans_breaks("log", function(x) exp(x), n.breaks = 5),
    labels = trans_format(
      "log",
      function(x) {
        # 配置小数位数（digits）和小数点符号（decimal.mark）
        formatted_num <- format(x, digits = 2, decimal.mark = ",")
        # 转换为数学表达式
        parse(text = paste0("e^", formatted_num))
      }
    )
  )

• digits = 2：设置指数部分保留2位小数
• decimal.mark = ","：将小数点改为逗号，若需用点则设为"."

方案2：直接显示原始刻度值 #

如果不需要指数形式的数学标签，仅需格式化原始x轴数值（如mpg的实际值），可直接用format函数处理标签：

library(tidyverse)

mtcars %>% ggplot(aes(x=mpg, y=disp))+
  geom_point() +
  scale_x_continuous(
    trans = log_trans(),
    breaks = trans_breaks("log", function(x) exp(x), n.breaks = 5),
    labels = function(x) format(x, digits = 1, decimal.mark = ".")
  )

这里的x是原始刻度值（如10、20等），可按需调整digits和decimal.mark参数。

内容的提问来源于stack exchange，提问作者Hassan Camil David