镶嵌图：提供给连续刻度的离散值

Question

我正在参与一个有关选民之间的关系及其投票行为的项目

x变量-感知（PQ8_W3）是具有4个值的分类变量：

• （1）个获胜者
• （2）失败者
• （3）不能说
• （9）不知道

而y变量（相同）是1/0哑元。

我知道x是一个因数，因此我尝试将其更改为数字，但仍无法生成镶嵌图。另外，我将9改为4，以使其变为连续，但仍然无法解决问题。

这是Dput数据

c(NA, NA, NA, NA, 1, NA, NA, 1, 1, 0, 0, 1, 1, 1, 1)
structure(c(1L, 1L, 1L, 1L, 1L, 1L, 1L, 3L, 1L, 1L, 1L, 2L, 1L, 
1L, 1L), .Label = c("1", "2", "3", "9"), class = "factor")

这是我的代码

library(ggplot2)
library(ggmosaic)
# here is fine, but I want to change the x and y variables 
ggplot(data = AfD) + geom_mosaic(aes(x = product(same), fill=PQ8_W3), na.rm=TRUE)  
# the error message comes out here, the console just gives me "Discrete value supplied to continuous scale"
ggplot(data = AfD) + geom_mosaic(aes(x = product(PQ8_W3), fill=(same), na.rm=TRUE))

希望有人可以提供帮助。