R语言中如何反转指定行的行名（不修改矩阵单元格值）

解决方法分两种场景（根据需求理解） #

先确认你的原矩阵：

mymatrix <- matrix(1:16, nrow = 4, ncol = 4, dimnames = list(letters[1:4], 1:4))

场景1：反转指定行的排列顺序（行随行列移动，单元格值不变）

如果你的需求是调整指定行的顺序（比如把分散的多行反转排列，比如指定b、c行，反转后变成c、b），可以通过重新索引行的方式一步完成批量处理：

# 定义要反转的目标行名
target_rows <- c("b", "c")
# 获取所有行名
all_rows <- rownames(mymatrix)
# 定位目标行的位置
target_pos <- match(target_rows, all_rows)
# 替换目标行的顺序为反转后的结果，生成新行索引
new_row_order <- replace(all_rows, target_pos, rev(target_rows))
# 生成调整后的新矩阵
new_matrix <- mymatrix[new_row_order, ]

运行后结果如下：

new_matrix
#    1  2  3  4
# a  1  2  3  4
# c  9 10 11 12
# b  5  6  7  8
# d 13 14 15 16

如果要处理其他分散的行（比如b、d行），只需要修改target_rows为对应行名即可，逻辑完全通用。

场景2：反转指定行的列元素顺序（行名不变，仅行内元素左右反转）

如果你的需求是让指定行的元素顺序反转（比如b行从5,6,7,8变成8,7,6,5），可以通过反转目标行的列索引实现，同样一步批量处理：

# 定义要反转元素的目标行名
target_rows <- c("b", "c")
# 复制原矩阵，避免修改原数据
new_matrix <- mymatrix
# 对目标行的列顺序进行反转
new_matrix[target_rows, ] <- mymatrix[target_rows, ncol(mymatrix):1]

运行后结果如下：

new_matrix
#    1  2  3  4
# a  1  2  3  4
# b  8  7  6  5
# c 12 11 10  9
# d 13 14 15 16

这种方法同样支持任意分散行的批量处理，只需将需要调整的行名放入target_rows即可，无需循环操作。

关键说明 #

两种方法都严格满足不修改单元格值的要求：

• 场景1仅调整行的排列顺序，每个单元格的数值未发生变化；
• 场景2仅改变目标行内数值的位置，数值本身没有被修改。

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