矩阵 Table 与 R

Matrix Table with R

我正在尝试获取结构,其中 Location 是唯一行,Lab 是唯一行,而帐户位于矩阵内。

我试过表格,但还没有做到 100% 正确。

最终结果:

sample:
structure(list(Location = c(1001, 1001, 1001, 1002, 1002, 1002, 
1003, 1003), Lab = c(1, 2, 3, 1, 2, 3, 1, 2), Account = c(53127, 
28724, 23646, 53128, 28725, 23647, 53130, 28727)), row.names = c(NA, 
-8L), class = c("tbl_df", "tbl", "data.frame"))

如果我们需要 matrix,则使用 base R

中的 xtabs
xtabs(Account ~ Location + Lab, df1)

或者从tidyr考虑pivot_wider,然后转换为matrix

library(tidyr)
library(tibble)
library(dplyr)
df1 %>% 
   pivot_wider(names_from = Lab, values_from = Account) %>% 
   column_to_rownames('Location') %>% 
   as.matrix