Сортировка вектора по времени

Question

У меня есть факторная переменная, которая состоит из времен.Когда я пытаюсь превратить это в фактор, R упорядочивает их по порядку от низшего к высшему.К сожалению, это означает, что я получаю что-то вроде следующего:

1:48:55  1:53:11  1:58:18  10:04:01 10:12:45 10:14:16 
10:20:24 10:21:59 10:23:11 10:23:40 10:30:40 10:34:13 
10:39:47 10:54:33 10:58:43 3:21:59  3:27:38  3:37:58  
3:49:00 4:20:42  4:30:52  4:37:39  4:40:08  4:40:55  
4:42:25  5:03:25  5:10:30  5:10:49  5:12:39  5:14:20

Таким образом, вместо того, чтобы печатать время по порядку, времена с 10:00 предшествуют 7:00.

ли быстрый способ упорядочить время по фактическому времени?

    time = c("1:48:55", "1:53:11", "1:58:18", "10:04:01", "10:12:45", "10:14:16", "10:20:24", "10:21:59", "10:23:11", "10:23:40", "10:30:40", "10:34:13", "10:39:47", "10:54:33", "10:58:43", "3:21:59", "3:27:38", "3:37:58", "3:49:00", "4:20:42", "4:30:52", "4:37:39",  "4:40:08", "4:40:55", "4:42:25", "5:03:25", "5:10:30", "5:10:49", "5:12:39", "5:14:20")

time = factor(time)

Answer 1

Попробуйте:

library(chron)
sort(times(time))

или это, если вы хотите, чтобы отсортированный вектор оставался фактором:

time[order(times(time))]

Answer 2

Элементы расположены в том порядке, в котором они находятся, поэтому при использовании factor они останутся в этом порядке, но вы можете установить уровни таким образом, чтобы регрессии сообщали о них «должным образом».Функция mixedsort в gtools будет сортировать такие векторы символов, как ожидалось:

require(gtools)
mixedsort(time)
 [1] "1:48:55"  "1:53:11"  "1:58:18"  "3:21:59"  "3:27:38"  "3:37:58"  "3:49:00"  "4:20:42"  "4:30:52" 
[10] "4:37:39"  "4:40:08"  "4:40:55"  "4:42:25"  "5:03:25"  "5:10:30"  "5:10:49"  "5:12:39"  "5:14:20" 
[19] "10:04:01" "10:12:45" "10:14:16" "10:20:24" "10:21:59" "10:23:11" "10:23:40" "10:30:40" "10:34:13"
[28] "10:39:47" "10:54:33" "10:58:43"

> time=factor(time, levels= mixedsort(time))
> levels(time)
 [1] "1:48:55"  "1:53:11"  "1:58:18"  "3:21:59"  "3:27:38"  "3:37:58"  "3:49:00"  "4:20:42"  "4:30:52" 
[10] "4:37:39"  "4:40:08"  "4:40:55"  "4:42:25"  "5:03:25"  "5:10:30"  "5:10:49"  "5:12:39"  "5:14:20" 
[19] "10:04:01" "10:12:45" "10:14:16" "10:20:24" "10:21:59" "10:23:11" "10:23:40" "10:30:40" "10:34:13"
[28] "10:39:47" "10:54:33" "10:58:43"
> time
 [1] 1:48:55  1:53:11  1:58:18  10:04:01 10:12:45 10:14:16 10:20:24 10:21:59 10:23:11 10:23:40 10:30:40
[12] 10:34:13 10:39:47 10:54:33 10:58:43 3:21:59  3:27:38  3:37:58  3:49:00  4:20:42  4:30:52  4:37:39 
[23] 4:40:08  4:40:55  4:42:25  5:03:25  5:10:30  5:10:49  5:12:39  5:14:20 
30 Levels: 1:48:55 1:53:11 1:58:18 3:21:59 3:27:38 3:37:58 3:49:00 4:20:42 4:30:52 4:37:39 ... 10:58:43

Если вы хотите, чтобы они сортировались как значения времени, вам нужно будет выбрать класс времени для работы.Пакет chron - один из возможных вариантов:

time = c("1:48:55", "1:53:11", "1:58:18", "10:04:01", "10:12:45", "10:14:16", "10:20:24", "10:21:59", "10:23:11", "10:23:40", "10:30:40", "10:34:13", "10:39:47", "10:54:33", "10:58:43", "3:21:59", "3:27:38", "3:37:58", "3:49:00", "4:20:42", "4:30:52", "4:37:39",  "4:40:08", "4:40:55", "4:42:25", "5:03:25", "5:10:30", "5:10:49", "5:12:39", "5:14:20")

> chron(times=time)
 [1] 01:48:55 01:53:11 01:58:18 10:04:01 10:12:45 10:14:16 10:20:24 10:21:59 10:23:11 10:23:40 10:30:40
[12] 10:34:13 10:39:47 10:54:33 10:58:43 03:21:59 03:27:38 03:37:58 03:49:00 04:20:42 04:30:52 04:37:39
[23] 04:40:08 04:40:55 04:42:25 05:03:25 05:10:30 05:10:49 05:12:39 05:14:20
> sort(chron(times=time))
 [1] 01:48:55 01:53:11 01:58:18 03:21:59 03:27:38 03:37:58 03:49:00 04:20:42 04:30:52 04:37:39 04:40:08
[12] 04:40:55 04:42:25 05:03:25 05:10:30 05:10:49 05:12:39 05:14:20 10:04:01 10:12:45 10:14:16 10:20:24
[23] 10:21:59 10:23:11 10:23:40 10:30:40 10:34:13 10:39:47 10:54:33 10:58:43