如何在R中将数据框第一列的行转为列、第二列值转为行？

你遇到问题的核心原因有两个：

1. 用cbind()创建数据框时，因混合字符、数值类型，所有列被统一转为字符型，导致后续重塑操作异常；
2. dcast()的公式逻辑错误，你需要将Hypothesis设为列名，而非行变量。

以下是几种可行的解决方案：

方法1：修正数据类型后使用dcast #

先把Estimates转换为数值型，再用dcast重塑数据：

# 修正数据框的类型问题
df$Estimates <- as.numeric(df$Estimates)

# 加载reshape2包，用.表示无行分组变量
library(reshape2)
result <- dcast(df, . ~ Hypothesis, value.var = "Estimates")
# 移除自动生成的多余行名列
result <- result[, -1]
print(result)

输出：

Hyp_1 Hyp_2 Hyp_3
1  0.34  0.01  0.22

方法2：直接转置（适合无重复假设的简单场景） #

如果每个Hypothesis唯一，直接用t()转置更高效：

# 转置数值列后转为数据框，设置列名
result <- as.data.frame(t(df$Estimates))
colnames(result) <- df$Hypothesis
print(result)

输出：

Hyp_1 Hyp_2 Hyp_3
1  0.34  0.01  0.22

方法3：用tidyr::pivot_wider（tidyverse风格） #

若习惯tidyverse工具链，pivot_wider逻辑更直观：

library(tidyr)
# 先修正数据类型
df$Estimates <- as.numeric(df$Estimates)
# 按假设名生成列，提取对应估计值
result <- pivot_wider(df, names_from = Hypothesis, values_from = Estimates)
print(result)

输出与上述方法一致。

内容的提问来源于stack exchange，提问作者Kevin López Reyes