superponer - Trazar puntos con colores y formas basados ​​en variables de datos

superponer graficas en r

Question

Estoy tratando de hacer una gráfica de dispersión con los colores de cada punto correspondientes a una variable y la forma de cada punto correspondiente a otra variable. Aquí hay algunos datos de ejemplo y el código que utilicé para hacer el segundo diagrama:

Example data:(of 3 points)
 X    Y    att1    att2

.5    .5    1       A
.24   .8    3       B
.6    .7    5       C

code:(for image2)
> plot(X,Y, col=statc[att2], pch = 15)
> legend("right", statv, fill=statc)

Where:
> statv
[1] "A"  "B" "C"  
> statc
[1] "red"    "blue"   "orange"

He hecho esto individualmente, pero no sé cómo hacer las dos cosas. Aquí hay dos tramas:

1

2

Por ejemplo: quiero que los colores se apliquen a los puntos con el mismo att1 y las formas a aplicar a los puntos con el mismo att2

Answer 1

¿Es esto lo que quieres? [df es su información formateada como arriba.]

library(ggplot2)
ggplot(df) + geom_point(aes(x=X,y=Y,color=factor(att1),shape=att2),size=5)

Produce esto con tus datos:

Answer 2

Uno de los dominios donde sobresale ggplot2 , en comparación con otros gráficos del sistema R, es mapear parámetros de trazado a variables de datos. (A través del mecanismo estético)

library(ggplot2)
dat <- data.frame(X =runif(20),
                     Y =runif(20),
                     att1 = gl(5,20/5),
                     att2 =gl(3,20/3))
ggplot(dat,aes(x=X,y=Y,color=att1,shape=att2)) +
    geom_point(size=5) 

También puedes hacerlo en la gráfica base, pero debes generar manualmente la leyenda ...

plot(dat$X,dat$Y,pch=as.integer(dat$att1),col=as.integer(dat$att1))