Skip to content

[R-es] scatterplot3d blanco y negro

4 messages · Jorge I Velez, Elvira Ferre, Carlos Ortega

Original
Elvira Ferre
# 
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)
Carlos Ortega
# 
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ó: