Как заказать мой лексикографический блок данных
У меня есть следующий фрейм данных
a = data.frame(a=c(1,2,3,4,5,6,7),b=c(1,2,3,10,12,21,4),c=c(1,2,10,11,"X","Y",3))
> a
a b c
1 1 1 1
2 2 2 2
3 3 3 10
4 4 10 11
5 5 12 X
6 6 21 Y
7 7 4 3
Я хочу отсортировать весь фрейм данных в лексикографическом порядке, чтобы вывод (например, столбец "с") должно быть как
> a[,"c"]
[1] 1 2 3 10 11 X Y
Я пытался, и я получаю другой ответ
indata indata[,"c"]
[1] 1 10 11 2 3 X Y
Levels: 1 10 11 2 3 X Y
Я попробовал gtools, mixedorder package и отлично работал на одной колонке:
> a[mixedorder(a$c),]
a b c
1 1 1 1
2 2 2 2
3 3 3 10
4 4 10 11
5 5 12 X
6 6 21 Y
7 7 4 3
но это нене работает, если я включаю несколько столбцов:
> a[with(a,order(mixedorder(c),mixedorder(b),mixedorder(a))),]
a b c
1 1 1 1
2 2 2 2
4 4 10 11
5 5 12 X
6 6 21 Y
7 7 4 3
3 3 3 10
хотя я ожидаю
a b c
1 1 1 1
2 2 2 2
4 7 4 3
5 3 3 10
6 4 10 11
7 5 12 X
3 6 21 Y