如何命名r中维度的“上标”？

Question

也许这是一个愚蠢的问题，但我找不到答案。如果我使用vcd包制作马赛克图，应该怎么做:

 library(vcd)
 test<-matrix(c(65,31,495,651), ncol=2,byrow=T)
 colnames(test)<-c("2010", "2011")
 rownames(test)<-c("yes", "now")
 mosaic(test, shade=T, legend=T)

这个功能非常好用，但是年份和输出（是/否）的上标显示为“A”和“B”。

我想把它们命名为“年份”和“输出”，但是我找不到相应的参数。怎么办？谢谢。

- v_e

Answer 1

您可以这样指定dimnames：

dimnames(test) <- list(foo=colnames(test),bar=rownames(test))
mosaic(test, shade=T, legend=T)

实际上，mosaic 更适用于应用于列联表，其中标签是由 table 函数确定的：

color <- sample(c("red","blue"),10,replace=TRUE)
color2 <- sample(c("yellow","green"),10,replace=TRUE)
tab <- table(color,color2)
mosaic(tab, shade=T)

- juba