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

Question

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

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

知道如何使用mosaic（）函数实现它吗？

编辑：我想以灰度模式转换颜色阴影，如下面的结果图：

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

Mosaic Plot Example

按照模式我的意思是这样的：

Patterns in a pizza-plot

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

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))