R语言ggplot2散点图坐标轴小数格式异常及修正需求

核心问题根源 #

从你提供的dput输出可以看到，两个绘图变量XRCOV_AC_IMPORTED和VMMI_2016_IMPORTED都是字符型（带引号的字符串），但散点图需要连续数值型变量，这是所有报错的根本原因：

• 使用scale_x_continuous时会提示“离散值传入连续刻度”
• label_number/number_format报错是因为未加载scales包，且变量类型不匹配

解决步骤 #

1. 将字符型变量转换为数值型 #

先修正变量类型，这是后续操作的前提：

# 转换变量类型为数值型
MergedDataSets$VMMI_2016_IMPORTED <- as.numeric(MergedDataSets$VMMI_2016_IMPORTED)
MergedDataSets$XRCOV_AC_IMPORTED <- as.numeric(MergedDataSets$XRCOV_AC_IMPORTED)

2. 绘制符合要求的散点图 #

以下代码实现：仅显示0、50、100刻度，坐标轴在(0,0)处相交

library(ggplot2)

ggplot(MergedDataSets, aes(x = VMMI_2016_IMPORTED, y = XRCOV_AC_IMPORTED)) +
  geom_point() +
  labs(x = "vmmi", y = "invasive cover") +
  # 设置坐标轴刻度与范围，expand=c(0,0)消除刻度与原点的间隙
  scale_x_continuous(breaks = c(0, 50, 100), limits = c(0, 100), expand = c(0, 0)) +
  scale_y_continuous(breaks = c(0, 50, 100), limits = c(0, 100), expand = c(0, 0)) +
  # 隐藏面板边框与背景，让坐标轴直接在原点相交
  theme(
    axis.line = element_line(color = "black"),
    panel.border = element_blank(),
    panel.background = element_blank()
  )

对之前报错的补充说明 #

• label_number/number_format：需要先加载scales包（library(scales)），且仅能用于数值型变量
• format(x, nsmall=2)：不能直接作为参数传入，需包装成函数形式labels = function(x) format(x, nsmall=2)，同样要求变量为数值型

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