将3x3 data.frame转换为1x9 data.frame，同时保留行和列名称

Question

对于这个看似简单的数据处理问题，我很难提出一个优雅的解决方案。 我可以看到一个循环的解决方案，但我假设有一个1-2函数的单行解决方案。

这是我所拥有的：

x <- data.frame(c1=c(1,2,3),
                c2=c(4,5,6),
                c3=c(7,8,9),
                row.names = c("r1","r2","r3"))

> x
   c1 c2 c3
r1  1  4  7
r2  2  5  8
r3  3  6  9

这就是我想要的：

> y
     c1.r1 c1.r2 c1.r3 c2.r1 c2.r2 c2.r3 c3.r1 c3.r2 c3.r3
1    1     2     3     4     5     6     7     8     9

如何操纵x给我y ？

Answer 1

这是一种实现方法：

R> unlist(lapply(x, setNames, rownames(x)))
c1.r1 c1.r2 c1.r3 c2.r1 c2.r2 c2.r3 c3.r1 c3.r2 c3.r3 
    1     2     3     4     5     6     7     8     9

data.frame是一个列表，因此lapply只是在列上循环。 然后将每个向量的名称rownames的data.frame的。 然后unlist列表将列表unlist为向量（默认情况下，递归设置名称）。