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))

有关更多信息，请参阅this tutorial。

Answer 2

github的问题似乎还没有完全解决...因此，对于任何渴望在ggplot中创建马赛克图的人来说，如果他们不能从github获得更新，可以使用annotate：

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)

​

​