मेरी dataframe ऑर्डर करने के लिए कैसे lexicographicaly

Question

मैं एक निम्न डेटा फ्रेम

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 

मैं lexicographical क्रम में पूरे डेटा फ्रेम सॉर्ट करने के लिए है, ताकि उत्पादन (उदाहरण के लिए, स्तंभ "सी")

की तरह होना चाहिए चाहते हैं

> a[,"c"] 
[1] 1 2 3 10 11 X Y 

मैंने कोशिश की और मैं अलग जवाब

indata <- a[do.call(order,a[,c("c","a","b")]),] 
> indata[,"c"] 
[1] 1 10 11 2 3 X Y 
Levels: 1 10 11 2 3 X Y 

मैं gtools की कोशिश की, mixedorder पैकेज एक geting हूँ nd एक स्तंभ पर ठीक काम किया:

> 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 

Answer 1

एक विकल्प का उपयोग करने के लिए है gtools पैकेज से।

library(gtools) 
a[mixedorder(a$c),] 
# a b c 
# 1 1 1 1 
# 2 2 2 2 
# 7 7 4 3 
# 3 3 3 10 
# 4 4 10 11 
# 5 5 12 X 
# 6 6 21 Y 

Answer 2

आधार में चिपका आप एक समारोह अपने आप को बना सकता है:

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)) 

SORTER_DEVICE <- function(x) { 
    c(sort(as.numeric(na.omit(gsub("[a-zA-Z]", NA, x)))), 
     sort(na.omit(gsub("[0-9]", NA, x)))) 
} 
data.frame(apply(a, 2, SORTER_DEVICE)) 

Answer 3

दुर्भाग्य mixedsort (अभी तक) एकाधिक स्तंभ छंटाई का समर्थन करता है। इसलिए, जब आप यह अपने आप को लागू करने, उदाहरण के लिए इस तरह की जरूरत है:

a[order(sub("[0-9]+", "", a$c), 
     as.numeric(sub("[[:alpha:]]*([[:digit:]]*)", '\\1', a$c)), 
     as.numeric(a$b), 
     as.numeric(a$a)), ] 

यह पहली, alphanumerically सॉर्ट करता data.frame एक $ ग का उपयोग कर, और टाई स्थितियों के लिए (जो वास्तव में अपने data.frame में मौजूद नहीं है ' ए '), यह $ बी और एक $ ए का उपयोग करता है।

आउटपुट है:

a b c 
1 1 1 1 
2 2 2 2 
7 7 4 3 
3 3 3 10 
4 4 10 11 
5 5 12 X 
6 6 21 Y 

पुनश्च: यह एक ऐसी ही सवाल का जवाब देने के रूप में this post में डेविड Winsemius द्वारा लिखा गया था।