如何绘制散点图，将点着色为第三维，其中颜色为热图，或者颜色的阴影刻度（包括图例也很好，但不是必需的）。
以下示例以彩虹色显示，但我想要将蓝色（或红色，绿色等）的色调着色，其中光线值较低而黑暗值较高。
x <- rnorm(10)
y <- rnorm(10)
z <- rnorm(10)
colors <- rev(rainbow(101))
zcolor <- colors[(z - min(z))/diff(range(z))*100 + 1]
plot(x,y,col=zcolor,pch=19,cex=1.5)
如果可能，我想使用标准绘图功能，而不是交换到其他选项之一。