如何将含x、y、z列的长格式数据框转换为z[x,y]格式的矩阵

你写的tidyr::pivot_wider(df, names_from = c(x, y), values_from = z)不符合需求的核心原因是：同时把x和y传入names_from参数会将两个变量的取值拼接为单个列名，最终只会生成1行100列的宽表，无法得到支持z[x,y]二维索引的矩阵结构。

方案1：基础R实现（最简洁，无额外依赖） #

直接使用交叉表函数xtabs一步生成符合要求的矩阵，行维度对应x取值，列维度对应y取值：

z_mat <- xtabs(z ~ x + y, data = df)

生成后直接用z_mat[x, y]即可索引对应位置的z值，和原始数据完全匹配。

方案2：tidyverse生态正确写法 #

如果要使用pivot_wider实现，需要单独指定x作为行维度、y作为列维度，转换后再转矩阵：

library(tidyr)
library(tibble)

z_mat <- df %>%
  # 仅把y作为列名来源，x保留为行标识
  pivot_wider(names_from = y, values_from = z) %>%
  # 将x列设为行名
  column_to_rownames("x") %>%
  # 转为矩阵
  as.matrix()

由于你的x、y取值恰好是1到10的连续整数，和矩阵的行号、列号完全对应，直接用z_mat[x, y]按位置索引即可。

内容的提问来源于stack exchange，提问作者drastega