Question

我在R中有一张表格str()：

 table [1:3, 1:4] 0.166 0.319 0.457 0.261 0.248 ...
 - attr(*, "dimnames")=List of 2
  ..$ x: chr [1:3] "Metro >=1 million" "Metro <1 million" "Non-Metro Counties"
  ..$ y: chr [1:4] "q1" "q2" "q3" "q4"

打印时看起来像这样：

                    y
x                           q1        q2        q3        q4
  Metro >=1 million  0.1663567 0.2612212 0.2670441 0.3053781
  Metro <1 million   0.3192857 0.2480012 0.2341030 0.1986102
  Non-Metro Counties 0.4570341 0.2044960 0.2121102 0.1263597

我想摆脱x和y并将其转换为与上述（三行，四列）完全相同的数据框，但没有{{1 }或x。如果我使用y，我会得到这个：

as.data.frame(mytable)

我可能从根本上不了解表与数据帧的关系。

Answer 1

我已经明白了：

as.data.frame.matrix(mytable)

做我需要的 - 显然，表需要以某种方式转换为矩阵，以便适当地转换为数据帧。我找到了有关此as.data.frame.matrix() function for contingency tables at the Computational Ecology blog的详细信息。

Answer 2

虽然结果在这种情况下有所不同，因为列名是数字，但我使用的另一种方式是data.frame(rbind(mytable))。使用@ X.X中的示例：

> freq_t = table(cyl = mtcars$cyl, gear = mtcars$gear)

> freq_t
   gear
cyl  3  4  5
  4  1  8  2
  6  2  4  1
  8 12  0  2

> data.frame(rbind(freq_t))
  X3 X4 X5
4  1  8  2
6  2  4  1
8 12  0  2

如果列名不以数字开头，则X不会被添加到其前面。

Answer 3

简短回答：使用as.data.frame.matrix(mytable)，正如@Victor Van Hee建议的那样。

答案很长：as.data.frame(mytable)可能不适用于table()函数生成的列联表，即使is.matrix(your_table)返回TRUE也是如此。它仍会将您的表格融为factor1 factor2 factori counts格式。

示例：

> freq_t = table(cyl = mtcars$cyl, gear = mtcars$gear)

> freq_t
   gear
cyl  3  4  5
  4  1  8  2
  6  2  4  1
  8 12  0  2

> is.matrix(freq_t)
[1] TRUE

> as.data.frame(freq_t)
  cyl gear Freq
1   4    3    1
2   6    3    2
3   8    3   12
4   4    4    8
5   6    4    4
6   8    4    0
7   4    5    2
8   6    5    1
9   8    5    2
> as.data.frame.matrix(freq_t)
   3 4 5
4  1 8 2
6  2 4 1
8 12 0 2

Answer 4

如果您使用的是tidyverse，则可以使用

as_data_frame(table(myvector))

获取tibble（即与基类有一些微小变化的数据框）

Answer 5

这太贵了

as.data.frame（mytable）

代替使用

convert（mytable，to =“ data.frame”）

如何将表转换为数据框

5 个答案: