将列中的 count 个元素插入 R 中的表中

我在 R 中工作，我有一个矩阵A, B and NA值，我想计算有多少A or B or NA每列中的值并将结果插入到表中。我使用下面的代码来计算A, B and NA.

mydata <- matrix(c(rep("A", 8), rep("B", 2), rep(NA, 2), rep("A", 4),
rep(c("B", "A", "A", "A"), 2), rep("A", 4)), ncol = 4, byrow = TRUE)

myFun <- function(x) {
data.frame(n.A = sum(x == "A", na.rm = TRUE), n.B = sum(x == "B",
na.rm = TRUE), n.NA = sum(is.na(x)))
}

count <- apply(mydata, 2, myFun)

现在，我需要插入 count 的结果(count <- apply(mydata, 2, myFun))进入数据帧作为只有标题的表。

与 mnel 的答案在概念上几乎相同，您还可以在基本 R 中尝试以下操作：

sapply(as.data.frame(mydata), 
       function(x) table(factor(x, levels = unique(as.vector(mydata))), 
                         useNA = "always"))
#      V1 V2 V3 V4
# A     4  6  6  6
# B     3  1  0  0
# <NA>  0  0  1  1

在这里，我没有手动指定因子水平，而是使用了mydata.