R语言：转置内置数据集mtcars后行名未转为列名的问题求助

我来帮你拆解这个问题，核心是R里数据框和矩阵的转置行为差异导致的，咱们一步步理清楚：

为什么会出现这个问题？ #

mtcars是一个数据框，当你调用t()函数转置时，R会先把数据框转换成矩阵再执行转置。其实转置后的矩阵已经把原mtcars的行名作为自己的列名了，但因为矩阵的展示逻辑和数据框略有不同，或者你直接把矩阵当成数据框来使用，就容易误以为没得到预期结果。

你可以先运行str(tmtcars)查看结构，会发现它是matrix类型而非data.frame。此时用colnames(tmtcars)就能看到：原mtcars的行名已经是转置后矩阵的列名了。

两种解决方案，对应你的不同需求 #

需求1：让原行名成为转置后数据框的列名 #

如果希望最终得到一个数据框，且列名是原mtcars的行名，只需要把转置后的矩阵转换成数据框即可：

# 转置得到矩阵
tmtcars_matrix <- t(mtcars)
# 转换为数据框，自动保留矩阵的列名（即原mtcars的行名）
tmtcars_df <- as.data.frame(tmtcars_matrix)
# 查看结果
head(tmtcars_df)

此时tmtcars_df的列名就是原mtcars的32个汽车型号，行名则是原mtcars的变量名（mpg、cyl等）。

需求2：让原行名成为转置后数据框的一列（而非列名） #

如果你希望原mtcars的行名作为新数据框的一个独立变量列（比如命名为car_model），可以用tidyverse工具链实现：

library(tidyr)
library(dplyr)

# 先给原mtcars添加一列存储行名
mtcars_with_names <- mtcars %>%
  mutate(car_model = rownames(.))

# 转成长格式再转宽，实现带行名列的转置
mtcars_transposed <- mtcars_with_names %>%
  pivot_longer(-car_model, names_to = "variable", values_to = "value") %>%
  pivot_wider(names_from = car_model, values_from = value)

# 查看结果
head(mtcars_transposed)

这样得到的mtcars_transposed里，原行名（汽车型号）就变成了数据框的列，原变量名则作为第一列。

如果不想用tidyverse，基础R也能实现需求2：

# 把原行名转为列
mtcars$car_model <- rownames(mtcars)
# 转置（包含新添加的car_model列）
tmtcars <- t(mtcars)
# 转换为数据框
tmtcars_df <- as.data.frame(tmtcars)
# 把car_model行的值设为列名
colnames(tmtcars_df) <- tmtcars_df["car_model", ]
# 删除car_model这一行
tmtcars_df <- tmtcars_df[-which(rownames(tmtcars_df) == "car_model"), ]

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