打印 y-axis 标题,数字的 10 次方和实乘号

Print y-axis title with number raised to power of 10 and real multiplication sign

我正在绘制以下数据:

library(ggplot2)
library(scales)

data <- data.frame(x = 1:3, y = 1:3)
ggplot(data, aes(x, y)) + 
    geom_point() +
    scale_y_continuous(name = paste("y value (*", math_format()(-4), ")", sep = ""))

如下所示:

我对y-axis标签不满意。我想将 * 更改为乘法符号(真正的乘法符号而不是字母 x)。我还希望 -4 的 10 次方。所需的 y-axis 标题如下:

我不知道如何实现这些。谢谢。

使用绘图:

ggplot(data, aes(x, y)) + 
  geom_point() + 
  ylab(expression(y~value~(phantom()%*%10^{-4})))