强制 R 将科学记数法写为带上标的 n.nn x 10^-n

假设我有两个花车

a <- 8.9384920e-24
b <- 0.00293892837

我想在图表上以 10 基科学记数法四舍五入到两位小数显示它们中的任何一个，可能使用paste()，但在 10 之后采用上标格式。

8.94 x 10^-24 #no ^ and superscript font
2.94 x 10^-4  #no ^ and supercript font, should be -4, not -04

这真的很疯狂，但它是上级要求的，它必须在基础 R （而不是 ggplot2）中完成，否则我将不得不重新编写 600 行代码......现在我只能看到浮点数是根据尺寸的不同，打印的方式也不同...

你可以检查一下eaxis包装内sfsmisc

# some data
x <- seq(1, 100000, len = 10)
y <- seq(1e-5, 1e-4, len = 10)

# default axes
plot(x, y)

# eaxis
plot(x, y, axes = FALSE)
eaxis(side = 1)
eaxis(side = 2)

您还可以创建标签expression using pretty10exp()来自同一个包。例如，将格式应用于绘图标题：

plot(x, y, axes = FALSE)
title(pretty10exp(y[1]))