r - 重新标记马赛克图中的 bin

Question

在马赛克图中，如何重新标记垃圾箱？

dat <- data.frame(letters = sample(LETTERS[1:3], 15, replace = TRUE),
                  numbers = sample(3, 15, replace = TRUE))
mosaicplot(table(dat))

也就是说，如何将下图中的“A”、“B”和“C”更改为“狗”、“牛”和“鸡”？

Answer 1

一种方法是重命名表格暗淡...

dat <- data.frame(letters = sample(LETTERS[1:3], 15, replace = TRUE),
                  numbers = sample(3, 15, replace = TRUE))

tab1 <- table(dat)
dimnames(tab1)[[1]] <- c("dogs","cows","chicken")
## note that dimnames(tab1)$letters <- c("dogs","cows","chicken") will work equally well

mosaicplot(tab1)

Answer 2

作为@MattTyers 解决方案的补充，以及是否可以一次性完成所有问题的后续问题：您可以使用公式中的formula方法mosaicplot()和使用方法来为因子factor()分配新的。请注意，您需要明确设置和设置，以免有.labelslevelsxlabylabfactor(..., labels = ...)

mosaicplot(~ factor(letters, labels = c("Aah", "Bee", "Cea")) +
  factor(numbers, labels = c("one", "two", "three")),
  data = dat, xlab = "Letters", ylab = "Numbers")