如何按照r中的名字对列表进行排序？

Question

假设数据是；

data<-structure(list(`4` = 9, `3` = 7, `1` = 5, `2` = 4, `5` = 2), .Names = c("4", 
"3", "1", "2", "5"))

看上去就像；

$`4`
[1] 9

$`3`
[1] 7

$`1`
[1] 5

$`2`
[1] 4

$`5`
[1] 2

但我想这样按最低到最高的顺序排序；

out<-structure(list(`1` = 5, `2` = 4, `3` = 7, `4` = 9, `5` = 2), .Names = c("1", 
"2", "3", "4", "5"))

Answer 1

这里有一条单线：

setNames(lapply(sort(names(data)), FUN = function(n) data[[n]]), sort(names(data)))

# $`1`
# [1] 5
# 
# $`2`
# [1] 4
# 
# $`3`
# [1] 7
# 
# $`4`
# [1] 9
# 
# $`5`
# [1] 2

Answer 2

您可以按名称排序，然后按排序列表调用列表：

data <- structure(list(`4` = 9, `3` = 7, `322` = 6, `1` = 5, `2` = 4, `5` = 2, `10` = 7),
              .Names = c("4", "3", "322", "1", "2", "5", "10"))
data <- data[order(as.numeric(names(data)))]

data
#$`1`
#[1] 5
#
#$`2`
#[1] 4
#
#$`3`
#[1] 7
#
#$`4`
#[1] 9
#
#$`5`
#[1] 2
#
#$`10`
#[1] 7
#
#$`322`
#[1] 6

Answer 3

下面是两条直线:创建希望作为向量的排序，并重新分配已排序的数据

sorting <- sort(as.numeric(names(data)))
data <- data[as.character(sorting)]