geom_contour与geom_label_contour：调整等高线标签小数位数

我尝试创建一系列等高线图，但等高线标签显示约10位小数，希望仅保留2位小数。以下是原始代码及生成的图：

plot <- 
  ggplot(data, aes(x = X, y = Y, z = pred, fill = pred)) +
  geom_tile() + 
  geom_contour(colour = "gray", 
               size = 0.15) +
  geom_label_contour(aes(z = pred), label.placer = label_placer_flattest()) +
  scale_fill_gradientn(colours = rev(brewer.pal(10, "RdYlBu")),
                       limits= c(0, 10)) +
  xlab("Easting") +
  ylab("Northing") +
  coord_cartesian(expand = FALSE) + 
  theme(legend.position = "none")

我曾尝试在geom_label_contour中设置breaks = pretty(round(data, digits = 2))，也在geom_contour中设置breaks = round(pretty(x = data,n = 10), digits = 2)，但标签仍显示10位小数。请问是哪个参数/函数控制等高线计算，如何将数值保留2位小数？

核心问题不是等高线的计算逻辑，而是标签的格式化规则，你需要在geom_label_contour里用label_format参数指定小数位数，具体操作如下：

• 第一步（可选但推荐）：统一等高线断点
  先计算出保留两位小数的等高线断点，同时给geom_contour和geom_label_contour使用，确保线条和标签完全对应：

  contour_breaks <- round(pretty(data$pred, n = 10), digits = 2)
  

• 第二步：添加标签格式化规则
  在geom_label_contour中加入label_format = label_format(digits = 2)，强制标签只显示两位小数，同时传入统一的断点：

  plot <- 
    ggplot(data, aes(x = X, y = Y, z = pred, fill = pred)) +
    geom_tile() + 
    geom_contour(colour = "gray", 
                 size = 0.15,
                 breaks = contour_breaks) + # 同步线条断点
    geom_label_contour(aes(z = pred), 
                       label.placer = label_placer_flattest(),
                       breaks = contour_breaks, # 对应线条的断点
                       label_format = label_format(digits = 2)) + # 关键：设置小数位数
    scale_fill_gradientn(colours = rev(brewer.pal(10, "RdYlBu")),
                         limits= c(0, 10)) +
    xlab("Easting") +
    ylab("Northing") +
    coord_cartesian(expand = FALSE) + 
    theme(legend.position = "none")
  

• 额外提示：

  • 如果不需要统一断点，仅格式化标签，直接在geom_label_contour里添加label_format = label_format(digits = 2)也能生效，但可能出现标签和线条断点不匹配的情况。
  • label_format()还支持添加单位、前缀后缀等格式化选项，可按需调整。

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