使用第一个日期对日期间隔列表进行排序

Question

如何对表单的日期间隔列表进行排序：

ll <- list(c('2015-03-01','2015-03-10'), c('2015-02-01','2015-02-10'),c('2015-01-01','2015-01-10'))

到第一次约会时，获取：

list(c('2015-01-01','2015-01-10'), c('2015-02-01','2015-02-10'),c('2015-03-01','2015-03-10'))

Answer 1

你可以试试这个

ll[order(sapply(ll, FUN = function(x) x[1]))]
[[1]]
[1] "2015-01-01" "2015-01-10"

[[2]]
[1] "2015-02-01" "2015-02-10"

[[3]]
[1] "2015-03-01" "2015-03-10"

来自Akrun的评论

ll[order(sapply(ll, `[[`, 1))]