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

【问题标题】：R, package vcd, mosaic(): How to substitute mosaic plot shading colours for patternsR，包vcd，马赛克（）：如何用马赛克图阴影颜色代替图案
【发布时间】：2017-09-23 00:48:23
【问题描述】：

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

出于出版目的，我需要用颜色阴影代替绘图中的灰度图案和图例。灰度的强度可以区分残差的绝对值，但我仍然必须能够通过在这些细胞中使用不同的“纹理”模式来区分负残差和正残细胞。

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

编辑：我想以灰度模式转换颜色阴影，如下图所示：

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

Mosaic Plot Example

我所说的模式是这样的：

Patterns in a pizza-plot

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

【问题讨论】：

如果您提供带有示例输入数据的reproducible example，会更容易为您提供帮助。一般来说，R 并不真正做纹理填充。也许您可以将绘图导出为 SVG 或 PDF，然后使用矢量图像编辑软件对其进行后期处理。
它不完全是纹理，只是不同的图案，如点、条纹等。就像这张图片中的i.stack.imgur.com/zRwlo.jpg

标签： r colors mosaic-plot

【解决方案1】：

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

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

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

【讨论】：