Pessoal; Estou tendo dificuldades em colocar no gráfico de superfície tonalidades de cor diferenciada em cada parte do gráfico, pois isso facilita a visualização e interpretação da relação de cada variável independente com a variável independente. Estou usando os seguintes comandos: TCF=seq(68,80) RG=seq(32,37) f1=function(x,y)3696.046+62.183*x-33.414*y PCS=outer(TCF,RG,f1) persp(TCF,RG,PCS,theta=-50,phi=-0,shade=2,ticktype = "simple",box=T,border=T,r = sqrt(20), d = 1,col="blue") Agradeço a ajuda! Atenciosamente, Thiago de Paula Protásio Acadêmico de Engenharia Florestal Universidade Federal de Lavras Laboratório de Energia da Biomassa Florestal Laboratório de Biomateriais (035) 9183-2246
Thiago, Eu sei fazer isso na lattice::wireframe(). Veja o código parcial que usei para geral o logo provisório da R-br b0 <- 10; b1 <- .5; b2 <- .3; int12 <- .2 g <- expand.grid(x = 1:20, y = 1:20) g$z <- b0 + b1*g$x + b2*g$y + int12*g$x*g$y i <- 45 rgb.palette <- colorRampPalette(c("yellow", "green4", "blue"), space = "rgb") wireframe(z~x*y, data=g, main="Em breve aqui estará o logotipo da [R-br]", sub="Você tem sugestões? Em breve uma enquete.", screen=list(z=i, x=-60), drape=TRUE, col.regions=rgb.palette(90)) À disposição. Walmes. ========================================================================== Walmes Marques Zeviani LEG (Laboratório de Estatística e Geoinformação, 25.450418 S, 49.231759 W) Departamento de Estatística - Universidade Federal do Paraná fone: (+55) 41 3361 3573 VoIP: (3361 3600) 1053 1173 e-mail: walmes@ufpr.br twitter: @walmeszeviani homepage: http://www.leg.ufpr.br/~walmes linux user number: 531218 ==========================================================================
participantes (2)
-
Thiago De paula protásio -
Walmes Zeviani