[R-br] (sem assunto)

[Fernando Mayer]

Uma opção seria

library(scatterplot3d)
x=c(-1,-1,-1,-1,-1,0,1,0,0,1,0,0,1,1,0)
y=c(-1,-1,0,1,0,1,0,-1,-1,-1,-1,1,1,0,0)
z=c(-1,0,1,0,-1,-1,-1,-1,1,0,-1,1,0,1,0)
w=scatterplot3d(x,y,z, highlight.3d = T, angle = 45,
    scale.y = .5,xlab="Concentração", ylab="pH",
    zlab="Agitação",col.axis="blue",type="n")
w$points3d(x,y,z,col="red",pch=20,cex=5)

# calcula media e desvio por ponto
med <- format(apply(cbind(x, y, z), 1, mean), digits = 3)
dp <- format(apply(cbind(x, y, z), 1, sd), digits = 3)
dp <- paste("(", dp, ")", sep = "")
# cria o label
lab <- paste(med, dp, sep = "\n")
# insere o label
text(w$xyz.convert(x, y, z), labels = lab, pos = 4, cex = .7)



---
Fernando de Pol Mayer
Doutorando em Estatística e Experimentação Agronômica
Escola Superior de Agricultura "Luiz de Queiroz" - ESALQ
Universidade de São Paulo - USP
URL: http://fernandomayer.github.io
e-mail: fernando.mayer [@] {gmail.com, usp.br}


2014/1/6 David Feitosa <contato em davidfeitosa.com>

> Existe a função text( ) que permite vc add um texto em uma dada coordenada
> (x,y).
> É isso o que vc quer?
>
>
>
> Atenciosamente,
>
> David Feitosa
>
> (\_(\
> (=°;°)
> (("")("")
>
>
> Em 6 de janeiro de 2014 12:46, Ari Clecius <ari072000 em yahoo.com.br>escreveu:
>
>> Bom dia alguém sabe como acrescento o valor da média e do desvio padrão
>> em cada ,ponto deste gráfico, ou seja, um label para cada ponto?
>>
>> Att,
>>
>> Ari Clecius Alves de Lima
>> Engenheiro Químico
>> Me. Engenharia Civil
>> (085)87687786
>> (085)33669042
>>
>> #código
>> *library(scatterplot3d)*
>> *x=c(-1,-1,-1,-1,-1,0,1,0,0,1,0,0,1,1,0)*
>> *y=c(-1,-1,0,1,0,1,0,-1,-1,-1,-1,1,1,0,0)*
>> *z=c(-1,0,1,0,-1,-1,-1,-1,1,0,-1,1,0,1,0)*
>> *w=scatterplot3d(x,y,z, highlight.3d = T, angle = 45, scale.y =
>> .5,xlab="Concentração", ylab="pH",zlab="Agitação",col.axis="blue",type="n")*
>> *w$points3d(x,y,z,col="red",pch=20,cex=5)*
>>
>>
>> _______________________________________________
>> R-br mailing list
>> R-br em listas.c3sl.ufpr.br
>> https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
>> Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça
>> código mínimo reproduzível.
>>
>
>
> _______________________________________________
> R-br mailing list
> R-br em listas.c3sl.ufpr.br
> https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
> Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça
> código mínimo reproduzível.
>
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20140106/645d125f/attachment.html>