强制R将科学记数写为n.nn x 10 ^ -n with superscript

Question

假设我有两个花车

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行代码......现在我只能看到的是浮动的印刷方式取决于它们的大小......

Answer 1

您可以查看包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创建标签pretty10exp()。例如，将格式应用于绘图标题：

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