Boa noite a todos!
Como distanciar o título do eixo z (zlab) dos números do eixo para não ficar
sobreposto? Assim como no exemplo abaixo:
x <- seq(-10, 10, length= 30)
y <- x
f <- function(x,y) { r <- sqrt(x^2+y^2); 10 * sin(r)/r }
z <- outer(x, y, f)
z[is.na(z)] <- 1
z <- z * 100
par(mar=c(0.1,2.2,0.1,1.4),cex=1.6)
persp(x, y, z, theta = 30, ticktype = "detailed", xlab="eixo
X",ylab="eixo Y",
zlab = "eixo Z",
col = "gray")
Outra dúvida: Tem como fazer um gráfico assim utilizando a função
scatterplot3d do pacote scatterplot3d. Se alguém tiver outra sugestão de
funções para fazer gráficos 3d, pode se manifestar.
Já fiz algumas tentativas com wireframe
do lattice, porém tive problemas, principalmente com os títulos dos eixos que
não ficam na angulação correta.
Desde já agradeço!
Gustavo Marcatti
Eng. Florestal - UFV