lig*_*ail 7 r frequency r-factor
这是我的数据
> a
[1] Male Male Female Male Male Male Female Female Male Male Female Male Male Male
[15] Female Female Female Male Female Male Female Male Male Female Male Male Female Male
[29] Male Male Female Male Male Male Female Female Male Male Male Male Male
Levels: Female Male
> b
[1] 0 1 0 1 0 0 0 0 1 1 1 1 0 1 0 0 0 1 0 0 1 0 0 0 1 1 1 0 0 0 0 1 1 0 0 1 0 1 1 1 1
Levels: 0 1
> table(a,b)
b
a 0 1
0 0
Female 10 4
Male 12 15
Run Code Online (Sandbox Code Playgroud)
我不知道为什么结果table(a,b)
有一行(0 0)
,我的预期结果如下:
> table(a,b)
b
a 0 1
Female 10 4
Male 12 15
Run Code Online (Sandbox Code Playgroud)
你能告诉我为什么会这样,以及如何纠正它,谢谢!
> dput(a)
structure(c(3L, 3L, 2L, 3L, 3L, 3L, 2L, 2L, 3L, 3L, 2L, 3L, 3L,
3L, 2L, 2L, 2L, 3L, 2L, 3L, 2L, 3L, 3L, 2L, 3L, 3L, 2L, 3L, 3L,
3L, 2L, 3L, 3L, 3L, 2L, 2L, 3L, 3L, 3L, 3L, 3L), .Label = c("",
"Female", "Male"), class = "factor")
> dput(b)
structure(c(1L, 2L, 1L, 2L, 1L, 1L, 1L, 1L, 2L, 2L, 2L, 2L, 1L,
2L, 1L, 1L, 1L, 2L, 1L, 1L, 2L, 1L, 1L, 1L, 2L, 2L, 2L, 1L, 1L,
1L, 1L, 2L, 2L, 1L, 1L, 2L, 1L, 2L, 2L, 2L, 2L), .Label = c("0",
"1"), class = "factor")
Run Code Online (Sandbox Code Playgroud)
从上面的评论来看:
发生这种情况是因为 中存在空因子水平a
:
> levels(a)
[1] "" "Female" "Male"
Run Code Online (Sandbox Code Playgroud)
您可以继续生成一个忽略空因子水平的表(来自@lmo的评论):
Run Code Online (Sandbox Code Playgroud)table(as.character(a), b)
或者,您可以轻松删除因子水平而无需观察(来自@Dave2e的评论)
Run Code Online (Sandbox Code Playgroud)a <- droplevels(a) table(a, b)