将df的行转换为数组内的矩阵

Question

我有一个nxp数据框，我希望将其转换为包含n矩阵的数组，其中每个矩阵都是ixj i+j = p。考虑以下代表：

library(tidyverse)

df <- tribble(
    ~x1, ~x2, ~x3, ~x4,
    1, 2, 3, 4,
    5, 6, 7, 8)

所需的结果是一个包含2个矩阵的数组，类似于：

生成的矩阵

array(1:8, c(2,2,2))

有人会有一种有效的方法在高维数据帧中获得这样的结果吗？

Answer 1

使用baseR和library(reshape) library(gridExtra) library(grid) mydf <- data.frame(id = c(1:5), value = c("A","B","C","D","E")) mytheme <- ttheme_default(base_size = 10, core=list(fg_params=list(hjust=0, x=0.01), bg_params=list(fill=c("white", "lightgrey")))) grid.table(mydf,cols = NULL, theme = mytheme, rows = NULL) ：

array