我正在制作一个散点图矩阵，其中包含三个变量（x，y，z），点的颜色根据类型（w）而不同。我想在此散点图矩阵中添加一个图例，以解释绘制点的颜色代表什么。但是，图例命令似乎不起作用（即我在图中看不到任何图例），并且尝试更改散点图矩阵的边距似乎也无法正常工作（图中似乎没有发生任何变化）。我的代码如下：
x <- rnorm(20, 1, 0.1)
y <- rnorm(20, 5, 1)
z <- rnorm(20, 10, 2)
w <- c(1,2,1,2,1,2,1,2,1,2,1,2,1,2,1,2,1,2,1,2)
dat <- data.frame(x, y, z, w)
pallet = c( "red", "blue")
plot(dat[c('x','y','z')], col=pallet[dat$w])
legend("topright", legend=c("one", "two"), col=pallet)
有没有办法将图例添加到我在这里缺少的散点图矩阵？