我想對資料框的每一行進行排序，而不會丟失 R 中的列名。
我知道這個接受的答案有效，但是這種方法不保留名稱，如下所示：
資料_5x3.csv
A,B,C,D,E
5,1,3,2,8
4,3,9,1,6
7,5,2,9,4
我的代碼：
df <- read.csv("data_5x3.csv")
df
# A B C D E
# 1 5 1 3 2 8
# 2 4 3 9 1 6
# 3 7 5 2 9 4
names(df)
# [1] "A" "B" "C" "D" "E"
sorted_df <- t(apply(df, 1, sort))
sorted_df
# [,1] [,2] [,3] [,4] [,5]
# [1,] 1 2 3 5 8
# [2,] 1 3 4 6 9
# [3,] 2 4 5 7 9
names(sorted_df)
# NULL
現在名字不見了。
我們如何防止丟失名稱？
uj5u.com熱心網友回復：
存盤名稱并應用它們：
nm = names(df)
sorted_df <- as.data.frame(t(apply(df, 1, sort)))
names(sorted_df) = nm
如果您愿意，可以將其壓縮為一行：
sorted_df = setNames(as.data.frame(t(apply(df, 1, sort))), names(df))
uj5u.com熱心網友回復：
另一種可能的解決方案：
library(dplyr)
df %>% apply(1, sort) %>% t %>% `colnames<-`(colnames(df))
#> A B C D E
#> [1,] 1 2 3 5 8
#> [2,] 1 3 4 6 9
#> [3,] 2 4 5 7 9
uj5u.com熱心網友回復：
您可以嘗試order row如下所示
m <- t(df)
df[] <- t(`dim<-`(m[order(col(m), m)], dim(m)))
你會得到
> df
A B C D E
1 1 2 3 5 8
2 1 3 4 6 9
3 2 4 5 7 9
轉載請註明出處，本文鏈接：https://www.uj5u.com/qianduan/437139.html