更改geom_mosaic图上的刻度线

Question

我在R中有以下数据集，我想使用ggplot2和ggmosaic将其制作成镶嵌图。

type   variable count residuals residcut residround
see.m       aca    44  4.380270     high          4
see.nm      aca    26 -3.063712      low         -3
see.m      conv    48 -1.562652      low         -2
see.nm     conv   135  1.092973   medium          1
see.m       fic    27 -2.194561      low         -2
see.nm      fic    98  1.534951   medium          2
see.m      news    17  1.504522   medium          2
see.nm     news    19 -1.052315      low         -1

我正在使用以下代码，它给出了下面的图：

ggplot(see.reg2) + geom_mosaic(aes(x = product(type, variable), weight = count, fill = type))

我想知道是否有可能改变底部刻度线的方式，所以我只能看到四个刻度线：每个“变量”级别一个，而不是八个刻度线（一个每次互动）。

谢谢！