如何使用R

Question

我想使用alpha函数在符号中使符号透明。但是，我使用col.list功能并不能真正使用在线提供的解决方案。这就是我的脚本的样子（我直接从excel打开我的数据）：

pch.list <- rep(0, length(data$CA))
pch.list[data$CA=="TC"] <- 21
pch.list[data$CA=="TI"] <- 22
pch.list[data$CA=="AN"] <- 23
pch.list[data$CA=="AT"] <- 24

col.list <- rep(0, length(data$CA))
col.list[data$CA=="TC"] <- "blue"
col.list[data$CA=="TI"] <- "purple"
col.list[data$CA=="AN"] <- "mediumturquoise"
col.list[data$CA=="AT"] <- "white"

par(mar=c(5,5,5,5))
plot(data$Cen, data$Oen, pch=c(pch.list), main="TE", bg=c(col.list, alpha=0.3), cex= 1.5,ylim=c(-15,0), xlim=c(-20, 1))
minor.tick(nx=5, ny=5, tick.ratio=0.5)

感谢!!!