R语言绘制多幅散点密度图，如何保证不同图像之间密度的颜色是统一的？

如图所示，两幅图像红色代表密度不统一，第一幅图的实际密度远远低于低一幅图。此外，如何用更多的连续颜色绘制此图以及如何加scale bar图例？

原代码如下plot(M$X,M$Y,col=densCols(M$X,M$Y,colramp = colorRampPalette(c('blue','green','yellow','red'))),pch=20,cex=1.5,xlim=c(-200,200),ylim=c(-200,200))

你好，我是有问必答小助手，非常抱歉，本次您提出的有问必答问题，技术专家团超时未为您做出解答


本次提问扣除的有问必答次数，将会以问答VIP体验卡（1次有问必答机会、商城购买实体图书享受95折优惠）的形式为您补发到账户。


因为有问必答VIP体验卡有效期仅有1天，您在需要使用的时候【私信】联系我，我会为您补发。