有没有办法在同一水平图上绘制具有不同色标的两个不同数据集？

Question

我在某些物体之间有两种距离测量。我想在两个度量之间的成对距离值中显示（不相似）结构-考虑到度量具有不同的比例。尽管执行此操作的最佳方法是为一个度量绘制一个上对角热图，为另一个度量绘制一个下对角热图，并覆盖它们，同时保持不同的配色方案和比例。但是，我正在努力在levelplot中完成此操作。

我尝试同时绘制两个图并将第二个背景设置为透明，但是第一个图没有显示出来。我宁愿避免使用ggplot，因为我知道创作者在同一个情节中有一个针对不同比例的（合理的）仇杀。

这是从数组中绘制两个图的基本代码，每个图包含成对的距离。我尝试了几种使背景透明的方法，但这并不能解决我的问题。

dists1[lower.tri(dists1,diag=TRUE)] <- NA
dists2[upper.tri(dists2,diag=TRUE)] <- NA
colfunc1 <- colorRampPalette(c("green","white","blue"))
colfunc2 <- colorRampPalette(c("red","white","blue"))
levelplot(dists1,subscripts = list(1), col.regions = colfunc1(16), colorkey = list(space='top'),xlab="",ylab="")
levelplot(dists2,subscripts = list(1), col.regions = colfunc2(16), colorkey = list(space='right'),xlab="",ylab="")

有什么办法可以将这些图显示在相同的轴上？

当前的各个图如下：（配色方案不是最终的）