如何在R中从含重复名称的长列表生成dataframe？

这是个很常见的长表转宽表需求，咱们用tidyverse工具链就能快速搞定，下面一步步来：

1. 先模拟你的原始数据（方便复现） #

首先把你提供的示例数据转换成R可处理的数据框：

library(tidyverse)

# 构建原始长格式数据
raw_data <- tibble(
  Name = c("var1", "var2", "var1", "var2", "var3"),
  Type = c("double[1]", "char[1]", "double[1]", "char[1]", "double[1]"),
  value = c(27.3, "Texas", 21.4, "California", -1.0)
)

2. 核心转换步骤 #

要实现你的目标，关键是先给每个变量的重复观测分配组内行号，再用这个行号作为“锚点”转成宽格式：

# 1. 给每个变量的重复值编号，确定哪些值属于同一行
processed_data <- raw_data %>%
  group_by(Name) %>%
  mutate(row_id = row_number()) %>% # 每个变量下的第1、2条记录分别标1、2
  ungroup()

# 2. 转成宽格式
wide_data <- processed_data %>%
  pivot_wider(
    id_cols = row_id,    # 用row_id来区分不同行
    names_from = Name,   # 把Name列的内容作为新列名
    values_from = value, # 把value列的内容填充到对应位置
    values_fn = list     # 确保每个(row_id, Name)组合只取一个值，避免报错
  ) %>%
  select(-row_id) # 可选：去掉row_id列，如果你不需要行号标识

3. 调整数据类型（可选） #

因为原始数据里value列混合了数值和字符，转宽后所有列会变成字符型。如果需要把var1和var3转回数值型，可以加一步：

wide_data <- wide_data %>%
  mutate(
    var1 = as.numeric(var1),
    var3 = as.numeric(var3)
  )

最终结果 #

运行后你会得到和预期一致的数据框：

# A tibble: 2 × 3
   var1 var2         var3
  <dbl> <chr>       <dbl>
1  27.3 Texas         NA
2  21.4 California   -1.0

备选方案（大数据量推荐） #

如果你的实际数据量很大，用data.table会更高效：

library(data.table)

setDT(raw_data)
# 给每个变量的重复值编号
raw_data[, row_id := .I, by = Name]
# 转宽格式
wide_dt <- dcast(raw_data, row_id ~ Name, value.var = "value")
wide_dt[, row_id := NULL] # 去掉行号列

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