在R中将无标签N×N矩阵转换为含坐标与值的数据表

步骤1：读取空格分隔的CSV文件 #

你的矩阵是空格分隔的（非标准逗号分隔CSV），用基础R的read.table()读取，参数header = FALSE表示数据无列名：

# 替换为你的文件实际路径，比如"~/Desktop/matrix_data.csv"
matrix_data <- read.table("你的文件路径/matrix_data.csv", header = FALSE)

步骤2：转换为长格式数据表 #

用reshape()函数直接将宽格式矩阵转为包含x（列坐标）、y（行坐标）、values（数值）的长格式，全程使用基础R，无需额外安装包：

# 执行格式转换
long_format <- reshape(
  data = matrix_data,
  varying = colnames(matrix_data),  # 指定所有列需要转换
  v.names = "values",               # 数值列的名称
  timevar = "x",                    # x对应原矩阵的列号
  times = 1:ncol(matrix_data),      # x坐标从1到矩阵列数
  idvar = "y",                      # y对应原矩阵的行号
  ids = 1:nrow(matrix_data),        # y坐标从1到矩阵行数
  direction = "long"                # 转为长格式
)

# 可选：整理行顺序并重置行名，让数据更整齐
long_format <- long_format[order(long_format$y, long_format$x), ]
rownames(long_format) <- NULL

步骤3：验证转换结果 #

用head()查看前几行数据，确认格式正确：

head(long_format)

输出示例：

y x values
1 1 1    0.5
2 1 2    0.4
3 1 3    0.0
4 1 4    0.0
5 1 5    0.0
6 1 6    0.0

可选：调整坐标起始值 #

如果需要x/y坐标从0开始（适配部分绘图需求），只需修改times和ids参数：

long_format_0start <- reshape(
  data = matrix_data,
  varying = colnames(matrix_data),
  v.names = "values",
  timevar = "x",
  times = 0:(ncol(matrix_data)-1),  # x从0开始
  idvar = "y",
  ids = 0:(nrow(matrix_data)-1),    # y从0开始
  direction = "long"
)

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