r - 如何在R的列联表中放置小数点？

Question

我的初始数据如下：

birth <- c(rep(1,50),rep(0,34))
birth <- factor(birth, levels=c(1,0),
         labels=c("Birth Complications","No Birth Complications")) 
mental.health <- c(rep(1,30),rep(2,26),rep(3,28)) 
mental.health <- factor(mental.health, levels=c(1,2,3), 
labels=c("Normal","Depressed","Schizophrenic")) 
table(mental.health,birth) 

---

但是当我尝试用小数替换每个单元格中的数字时（例如，从第一个单元格中的 30 到右下角单元格中的 30.5 和 6 到 6.5），R 说我的行和列的长度不相等。

这是我正在尝试但不工作的代码：

birth <- c(rep(.5,101),rep(0.5,68))  
birth <- factor(birth, levels=c(1,0), labels=c("Birth 
Complications","No Birth Complications")) 
mental.health <- c(rep(2,120),rep(2,52),rep(3,56)) 
mental.health <- factor(mental.health, levels=c(1,2,3), 
labels=c("Normal","Depressed","Schizophrenic")) 
table(mental.health,birth)     

我所做的是将 1 替换为 0.5，然后将该数字的频率从 50 更改为 101，从而使该数字的频率翻倍。非常感谢您的帮助。