基于聚类结果在R语言中创建新列的技术求助

从Stata转R确实得适应不同的数据处理逻辑，你要实现的就是把长格式数据转成宽格式，让每个聚类作为单独的列，对应填充数值。下面是几种常用方法：

方法1：用tidyr包（tidyverse生态，推荐） #

tidyverse是现在R数据处理的主流工具，语法更直观：

1. 先安装并加载包：

install.packages("tidyr")
library(tidyr)

2. 假设你的数据是类似这样的长格式（替换成你实际的变量名）：

# 示例数据：obs_id是观测唯一标识，cluster是聚类名称，value是对应数值
df <- data.frame(
  obs_id = c(1, 2, 1, 2, 1),
  cluster = c("聚类1", "聚类1", "聚类2", "聚类2", "聚类3"),
  value = c(10, 20, 30, 40, 50)
)

3. 执行转换：

df_wide <- pivot_wider(
  data = df,
  id_cols = obs_id,  # 用来区分每一行的变量（比如你的观测ID）
  names_from = cluster,  # 指定作为新列名的变量（你的聚类）
  values_from = value   # 指定填充到新列的数值变量
)

如果你的数据没有单独的obs_id，也可以省略id_cols，但建议确保每行的聚类-数值组合是唯一的，避免重复值报错。

方法2：用base R自带的reshape函数（无需额外装包） #

如果不想装新包，用base R就能实现：

df_wide_base <- reshape(
  data = df,
  idvar = "obs_id",
  timevar = "cluster",
  direction = "wide"
)

方法3：用reshape2包（经典工具） #

reshape2是早期常用的重塑包，语法也很清晰：

install.packages("reshape2")
library(reshape2)
df_wide_reshape2 <- dcast(df, obs_id ~ cluster, value.var = "value")

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