Есть ли способ добавить латексные команды в лаборатории в scatter3D в r?

Question

Я ищу способ написать латексные команды, такие как $ \ nu $ и $ S_t $, в лаборатории scatter3D () из пакета plot3D.

Answer 1

Нет.

На обычных участках вы обычно можете получить с помощью 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)

Но rgl, на котором основан plot3D, не поддерживает plotmath.