r-如何制作一个具有table()一维输出的data.frame

Question

以下是我试图实现的

> table(mtcars$cyl)
4  6  8 
11  7 14 

我需要这种格式的

mtcars_table <- data.frame(
"4" = c(11),
"6" = c(6),
"8" = c(14))
> print(mtcars_table)
X4 X6 X8
1 11  6 14

我非常需要分类变量作为列，计数作为行。如果有一种dplyr的方式更容易做到这一点，我也很乐意。

Answer 1

试试这个：

#Code
mytable <- data.frame(rbind(table(mtcars$cyl)))

输出：

X4 X6 X8
1 11  7 14

Answer 2

# unclass() + t()
as.data.frame(t(unclass(table(mtcars$cyl))))
#    4 6  8
# 1 11 7 14
# as.list()
as.data.frame(as.list(table(mtcars$cyl)))
X4 X6 X8
1 11  7 14
# Super fast
data.table::setDF(as.list(table(mtcars$cyl)))[]