有没有在 r 中的 scatter3D 实验室中添加乳胶命令?
Is there anyway of adding latex commands to the labs in scatter3D in r?
我正在寻找一种方法来将 $\nu$ 和 $S_t$ 等 Latex 命令写入 plot3D 包中的 scatter3D() 实验室。
没有。
在常规地块上,您通常可以使用 expression()
和 plotmath
,例如:
x <- seq(-4*pi, 4*pi, by=pi/100)
y.sinc <- sin(pi*x)/(pi*x)
y.sinc[is.na(y.sinc)] <- 1
plot(x, y.sinc, type="l", col="blue", xaxt="n", ylab="")
mtext(expression(sinc[pi] == frac(sin*(pi*x), pi*x)), line=0)
s <- seq(-4*pi, 4*pi, by=pi)
lab <- expression(-4*pi, -3*pi, -2*pi, -pi, 0, pi, 2*pi, 3*pi, 4*pi)
axis(1, at=s, labels=lab)
但是plot3D
所基于的rgl
不支持plotmath
。
我正在寻找一种方法来将 $\nu$ 和 $S_t$ 等 Latex 命令写入 plot3D 包中的 scatter3D() 实验室。
没有。
在常规地块上,您通常可以使用 expression()
和 plotmath
,例如:
x <- seq(-4*pi, 4*pi, by=pi/100)
y.sinc <- sin(pi*x)/(pi*x)
y.sinc[is.na(y.sinc)] <- 1
plot(x, y.sinc, type="l", col="blue", xaxt="n", ylab="")
mtext(expression(sinc[pi] == frac(sin*(pi*x), pi*x)), line=0)
s <- seq(-4*pi, 4*pi, by=pi)
lab <- expression(-4*pi, -3*pi, -2*pi, -pi, 0, pi, 2*pi, 3*pi, 4*pi)
axis(1, at=s, labels=lab)
但是plot3D
所基于的rgl
不支持plotmath
。