r - R，包 vcd，马赛克（）：如何用马赛克图阴影颜色代替图案

Question

通常，马赛克（）函数会生成一个马赛克图，其中单元格的阴影表示独立的 Pearson 残差。红色表示负值，蓝色表示正值，较强的阴影表示较高的绝对残差值。

我需要将颜色阴影替换为绘图中的灰度模式和用于发布目的的图例。灰度的强度可以区分残差的绝对值，但我仍然必须能够通过在这些单元格中使用不同的“纹理”模式来区分负和正残差单元格。

知道如何使用马赛克（）函数来实现这一点吗？

编辑：我想以灰度模式转换颜色阴影，就像在下面的结果图中一样：

#Mosaic Plot Example library(vcd) mosaic(HairEyeColor, shade=TRUE, legend=TRUE)

马赛克图示例

模式我的意思是这样的：

比萨饼图中的模式

所以蓝色是一种模式。不同强度的蓝色导致相同图案的不同强度。红色是另一种不同的图案，不同强度的红色会导致第二种图案的不同强度。

Answer 1

模式在vcd. 但是，您可以分别对正残差和负残差使用不同的线型。这工作得相当好（虽然颜色会更加突出）并且很容易在不同的着色功能中使用。此外，如果您使用，shading_hcl()您可以轻松关闭色度以获得相同颜色的去饱和版本，例如，在电子纸中使用彩色版本，在印刷手稿中使用灰度版本。

mosaic(HairEyeColor, gp = shading_hcl(HairEyeColor, lty = 1:2))

mosaic(HairEyeColor, gp = shading_hcl(HairEyeColor, lty = 1:2, c = 0))