[R-es] scatterplot3d blanco y negro
Hola,
Aunque tengas ya el problema resuelto, por cuestiones estéticas, de acabado
te propongo una alternativa basada en este paquete reciente "plot3D":
# dummy data
df <- data.frame(
x = runif(50),
y = runif(50),
z = runif(50),
group =sample(1:3,50, replace = TRUE)
)
library(plot3D)
with(df, scatter3D(x = x, y = y, z = z, colvar = group, col=jet.col(3),
pch = 16, cex = 0.85, xlab = "X", ylab = "Y",
cex.axis=0.7,
zlab = "Z", clab = c("Factor"),
main = "Plot3D", ticktype = "detailed",
theta = 40, phi=20, d = 2, bty="g", type="h",
colkey = list(length = 0.5, width = 0.5, cex.clab =
0.75))
)
El resultado, al menos para mÃ, merece la pena más que el de
scatterplot3d....:
[image: Imágenes integradas 2]
Saludos,
Carlos Ortega
www.qualityexcellence.es
El 11 de marzo de 2014, 11:05, Elvira Ferre <mariaelvira.ferre en um.es>escribió:
Perfecto, justo lo que buscaba. MuchÃsimas gracias. Saludos. El 11/03/14 10:29, Jorge I Velez escribió:
Hola Elvira, Muchas gracias por el codigo. Intenta lo siguiente:
scatterplot3d(df$x,df$y,df$z,color=factor(df$group,label=c("green","blue","red")),
pch=as.numeric(df$group))
Saludos,
Jorge.-
2014-03-11 20:12 GMT+11:00 Elvira Ferre <mariaelvira.ferre en um.es
<mailto:mariaelvira.ferre en um.es>>:
Hola,
tengo unos datos clasificados en tres grupos y quiero
representarlos en un cubo de forma que
cada grupo tenga un color/ sÃmbolo distinto.
He conseguido hacerlo por colores (código) y me gustarÃa hacerlo
variando el 'pch'. He intentado hacerlo del mismo modo pero no
funciona. ¿Se puede hacer?¿Puede ayudarme alguien?
MuchÃsimas gracias. Elvira.
library(scatterplot3d)
# dummy data
df <- data.frame(x = runif(50),
y = runif(50),
z = runif(50),
group =as.factor(sample(letters[1:3],50, replace
= TRUE)))
# create the plot
scatterplot3d(df$x,df$y,df$z,color=factor(df$group,label=c("green","blue","red")),
pch=19)
--
Sec. Apoyo EstadÃstico.
Servicio de Apoyo a la Investigación (SAI)
Vicerrectorado de Investigación e Internacionalización.
Universidad de Murcia
Edif. SACE. Campus de Espinardo.
30100 Murcia
@. mariaelvira.ferre en um.es <mailto:mariaelvira.ferre en um.es>
T. 868 88 7315 F. 868 88 7302
www.um.es/sai <http://www.um.es/sai> www.um.es/ae
<http://www.um.es/ae>
---
_______________________________________________
R-help-es mailing list
R-help-es en r-project.org <mailto:R-help-es en r-project.org>
https://stat.ethz.ch/mailman/listinfo/r-help-es
--
Sec. Apoyo EstadÃstico.
Servicio de Apoyo a la Investigación (SAI)
Vicerrectorado de Investigación e Internacionalización.
Universidad de Murcia
Edif. SACE. Campus de Espinardo.
30100 Murcia
@. mariaelvira.ferre en um.es
T. 868 88 7315 F. 868 88 7302
www.um.es/sai www.um.es/ae
---
[[alternative HTML version deleted]]
_______________________________________________ R-help-es mailing list R-help-es en r-project.org https://stat.ethz.ch/mailman/listinfo/r-help-es
Saludos, Carlos Ortega www.qualityexcellence.es ------------ próxima parte ------------ Se ha borrado un adjunto en formato HTML... URL: <https://stat.ethz.ch/pipermail/r-help-es/attachments/20140311/37dc5b6a/attachment-0001.html> ------------ próxima parte ------------ A non-text attachment was scrubbed... Name: Rplot.png Type: image/png Size: 89133 bytes Desc: no disponible URL: <https://stat.ethz.ch/pipermail/r-help-es/attachments/20140311/37dc5b6a/attachment-0001.png>