“缺少值需要TRUE / FALSE”错误vcd :: mosaic

Question

> library(vcd)
Loading required package: MASS
Loading required package: grid
Loading required package: colorspace
> library(MASS)
> tbl = table(survey$W.Hnd,survey$Fold)
> print(tbl)

        L on R Neither R on L
  Left      10       1      7
  Right     88      17    113
> mosaic(tbl)
Error in if (split_vertical[i]) { : missing value where TRUE/FALSE needed
Calls: mosaic -> mosaic.default -> strucplot -> labeling
Execution halted

为什么我会收到此错误，以及如何修复代码？

---

在此处轻松粘贴代码：

library(vcd)
library(MASS)
tbl = table(survey$W.Hnd,survey$Fold) # survey is a library data set in MASS
print(tbl)
mosaic(tbl) # produces the above error

Answer 1

试试这个：

> mosaic(survey$W.Hnd ~ survey$Fold)

Answer 2

另一种选择是使用structable包本身的vcd。

library(vcd)
library(MASS)
tbl <- structable(survey$W.Hnd ~ survey$Fold)
print(tbl)
mosaic(tbl)