r - 如何在plotly中为3D绘图的轴标签添加上标或下标？

Question

如何在plotly中为3D绘图的轴标签添加上标或下标？

我尝试使用 bquote ，但它没有用。谷歌搜索也没有给这个问题带来太多。

清除代码:

library(plotly)
set.seed(123)

n <- 100
theta <- runif(n, 0, 2*pi)
u <- runif(n, -1, 1)


base<-'B1'
compare<-'A1'
plot (1, 1, main = bquote('Annual mean' ~CO[2] ~'Flux Difference: \n'  ~.(compare)~ 'minus'~.(base)))


p <- plot_ly(x = ~sqrt(1 - u^2) * cos(theta), y = ~sqrt(1 - u^2) * sin(theta), z = ~u) %>%
  layout(
    title = "Layout options in a 3d scatter plot",
    scene = list(
      xaxis = list(title = bquote('Annual mean' ~CO[2] ~'Flux Difference: \n'  ~.(compare)~ 'minus'~.(base))),
      yaxis = list(title = "Sin"),
      zaxis = list(title = "Z")
    ))
p

感谢您的时间!

Answer 1

使用 HTML 标签，例如:

yaxis = list(title = "Sin<sup>super</sup>")

更多信息 here .希望这可以帮助!