用两种颜色绘制data.table

Question

我有一个非常大的data.table，我想在列中相互映射一个值的样本，根据0-1第三列着色。

这是制作黑色图的代码。我希望它根据我的data.table中的列y着色（0 =蓝色，1 =红色）。

plot(as.data.frame(mydata)[sample(1:nrow(mydata),10000),8:16])

谁能告诉我怎么做？

Answer 1

以下给出了我想要的情节

sample_to_plot = sample(1:nrow(dt),10000)
windows() 
pairs(dt[sample_to_plot,8:16], main = "plots", pch = 20, col = alpha(ifelse(dt[sample_to_plot,7]==0,"blue","red"),0.3))