r - geom_mosaic：X 轴刻度标签未显示？

Question

我ggmosaic::geom_mosaic用来生成马赛克图。我似乎无法将自变量的值标签显示在 X 轴上。变量是一个标记因子，水平标记为“1”、“2”、“3”。我确定这很愚蠢，但我无法弄清楚这里发生了什么。任何见解将不胜感激。

ggplot(data = mosaic)+
geom_mosaic(aes(x = product(X, Norm_Dx), fill=Norm_Dx), na.rm=TRUE)

Answer 1

我建议你使用mosaicplot.

mosaicplot(table(X, Norm_Dx))

有关详细信息，请参阅本教程。

Answer 2

github 问题似乎还没有完全解决……因此，对于同时渴望在 ggplot 中绘制马赛克图并且无法从 github 获取更新工作的其他人来说，可以使用注释：

data(Titanic)

titanic <- as.data.frame(Titanic)
titanic$Survived <- factor(titanic$Survived,
                           levels = c("Yes", "No"))

ggplot(data = titanic) +
  geom_mosaic(aes(weight = Freq, x = product(Class), fill = Survived)) +
  labs(x = "Passenger class",
       y = "Survived sinking",
       title = "Survival rate by passenger class")+      
  annotate(geom="text",x=0.43,y=-0.02,label="This                 is a                          very silly                                     solution",
           color="black",size=3)  +
  annotate(geom="text",x=-0.02,y=0.5,label="0                    0.25                  0.5                  0.75                    1",
           colour="black",size=3,angle=90)