I think the best approach to this would be to use a different shader that contains the p-value by default (like shading_hcl) and then modify the color of that shader ( https://rdrr.io/cran/vcd/src/R/shadings.R )
So to make your example working with that new shader:
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)))
The technical post webpages of this site follow the CC BY-SA 4.0 protocol. If you need to reprint, please indicate the site URL or the original address.Any question please contact:yoyou2525@163.com.