如何告訴mosaic（mosaic plot，R，VCD包）即使在使用residual shading時也總是打印p值？

Question

當我使用默認陰影shade=T制作馬賽克 plot 時，p 值顯示在圖例下方

mosaic(~ gear + carb, data = mtcars, shade=T)

當我改為使用Friendly2着色時，我沒有得到 p 值。

mosaic(~ gear + carb, data = mtcars, gp=shading_Friendly2)

Answer 1

我認為最好的方法是使用默認包含 p 值的不同着色器（如 shading_hcl），然后修改該着色器的顏色（ https://rdrr.io/cran/vcd/src/R /陰影.R ）

因此，要讓您的示例使用該新着色器：

cars <- table(mtcars$gear, mtcars$carb)

mosaic(cars, gp = shading_hcl(observed=cars, eps=0.01, lty=1:2, h=c(260,0), c=c(200, 200), l=c(90, 50)))