r - R中的散点图

Question

我对r相当陌生，我必须绘制散点图：

residues1  residues2  coovariance
1          1          0.99613318 
2          1          0.98771518
3          1          0.98681384
4          1          0.99225447

residue 1和residue2as x, yaxis 和 thecoovariance是色标而不是高度。我以前使用过散点图​​ 3d，但不知道如何将第三轴绘制为色标。请帮忙 。

谢谢

维宝

Answer 1

我不确定每列 3 带有颜色的 xy 图是可视化这一点的最佳方式。如果residues2是一个常数，概率。最好将其完全排除在外，并将其他值相互绘制。

也许您可以根据需要调整以下内容：

df1 <- data.frame(r1=seq(4), r2=rep(1,4),
                  c1=c(0.99613318, 0.98771518,  0.98681384, 0.99225447) )
### give order (for plotting)
df1 <- within(df1, c2 <- rank(c1))
### create blank plot
with(df1, plot(r1,r2, xlab="residues_1", ylab="residues_2", cex.lab=1.5))
### strongest red to largest color
with(df1, points(r1, r2, cex=15, pch=19, col = rev(heat.colors(4))[c2] ))
### make legend
l1 <- as.matrix(df1[ ,"c1"])
graphics::legend("topright", legend=l1, lty=1, title="covariance", lwd=3,
                 col = rev(heat.colors(4))[df1$c2], cex=2)

给予：

（我让图像元素有点过大，并在保存之前手动调整了尺寸.png，以便在此处更好地显示）。