ggplot分面如果坐标轴数值大于1000则使用科学计数法

可以使用scale_y_continuous()和scale_x_continuous()函数中的label_scientific()来将坐标轴数值转换为科学计数法。例如：

library(ggplot2)

# 创建数据集
df <- data.frame(x = 1:10,
                 y = c(100, 200, 500, 1000, 2000, 5000, 10000, 20000, 50000, 100000))

# 绘制散点图
ggplot(df, aes(x, y)) + 
  geom_point() +
  facet_wrap(~ x, scales = "free_x") + # 分面
  scale_y_continuous(labels = scales::label_scientific()) # 将y轴数值转换为科学计数法

其中，label_scientific()函数用于将数值转换为科学计数法，并自动设置合适的指数格式和小数位数。scales包提供了许多其他的标签格式函数，例如label_percent()用于将数值转换为百分比格式。