如何用行号向量自定义排序DataFrame且保留其数据框类型？

问题原因 #

你的my_df仅包含一列数据，R中[索引操作的默认行为（drop=TRUE）会自动将单列数据框简化为向量，导致排序后丢失数据框结构。

解决方案 #

1. 索引时禁用自动简化

在索引语句中添加drop=FALSE参数，强制保留数据框类型：

sorted_df <- my_df[sample_order, , drop = FALSE]

2. 使用dplyr::slice（tidyverse风格推荐）

slice函数可以直接按行号选取行，且默认保留数据框/tibble结构，代码更直观：

library(dplyr)
sorted_df <- my_df %>% slice(sample_order)

3. 改用tibble避免自动简化

tibble类型的索引默认不会自动简化为向量，你可以调整数据创建方式：

# 方式1：将现有data.frame转为tibble
my_df_tibble <- as_tibble(my_df, rownames = "name")
sorted_df <- my_df_tibble[sample_order, ]

# 方式2：直接创建tibble（不转行名更便于后续操作）
my_df <- tibble(name = c(paste("sample", seq(1:12), sep = "_")),
                treatment = c(rep(1, 4), rep(2, 5), rep(1, 3)))
sorted_df <- my_df %>% slice(sample_order)

验证结果 #

执行class(sorted_df)，输出应为"data.frame"或"tbl_df" "tbl" "data.frame"，确认数据框类型已保留。

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