r - 基于数据变量绘制具有颜色和形状的点

Question

我正在尝试制作一个散点图，每个点的颜色对应一个变量，每个点的形状对应另一个变量。
这是一些示例数据和我用来制作第二个图的代码:

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"

我已经单独完成了此操作，但不知道如何同时进行。这是两个情节:
1
2
例如:我希望颜色适用于具有相同 att1 的点，而形状适用于具有相同 att2 的点

Answer 1

所在域之一ggplot2 excels ，与其他 R 系统绘图相比，将绘图参数映射到数据变量。(通过美学机制)

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) 

您也可以在基本图中执行此操作，但您应该手动生成图例...

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