कैसे पुन: क्रम स्तंभों से मर्ज को रोकने के लिए

Question

निम्न उदाहरण

x <- data.frame(code = 7:9, food = c('banana', 'apple', 'popcorn')) 
y <- data.frame(food = c('banana', 'apple', 'popcorn'), 
       isfruit = c('fruit', 'fruit', 'not fruit')) 

में मैं x <- merge(x, y) करना चाहते हैं, लेकिन समस्या यह है कि merge() पुन: क्रमित कॉलम ताकि by स्तंभ (खाद्य) पहले आता है। मैं इसे कैसे रोक सकता हूं और merge(x, y) एक्स के समान कॉलम ऑर्डर का उपयोग कर सकता हूं और केवल "चर, कोड, आइसफ्रूट" के बजाय तीसरा कॉलम (यानी, "कोड, भोजन, आइसफ्रूट") के रूप में नया चर (isFruit) डालें)?

मैं इस की कोशिश की है, कोई लाभ नहीं हुआ:

merge(x, y, sort = F) 

मेरे वैकल्पिक हल इस बाद में

x <- x[c(2, 1, 3)] 

Answer 1

यहाँ अपने आधार वैकल्पिक हल के जेनेरिक वर्जन है:

merge(x, y)[, union(names(x), names(y))] 

Answer 2

आप इसे अपने कस्टम समारोह में लपेट कर सकते हैं करना है।

merge.keep <- function(...,ord=union(names(x), names(y)))merge(...)[ord] 

तो उदाहरण के लिए

: उदाहरण के लिए:

merge.keep(x,y) 
    code food isfruit 
1 8 apple  fruit 
2 7 banana  fruit 
3 9 popcorn not fruit 

संपादित मैं @Eddi विचार का उपयोग ord के मूलभूत मूल्यों स्थापित करने के लिए।

Answer 3

plyr इस आसान बनाता है:

x <- data.frame(code = 7:9, food = c('banana', 'apple', 'popcorn')) 
y <- data.frame(food = c('banana', 'apple', 'popcorn'), 
       isfruit = c('fruit', 'fruit', 'not fruit')) 

library(plyr) 
join(x,y) 

     #GOOD 
#Joining by: food 
# code food isfruit 
#1 7 banana  fruit 
#2 8 apple  fruit 
#3 9 popcorn not fruit 

    #BAD 
# merge(x,y) 
#  food code isfruit 
#1 apple 8  fruit 
#2 banana 7  fruit 
#3 popcorn 9 not fruit 

Answer 4

आप केवल एक कॉलम में लाने के लिए और तो शायद merge overkill है संलग्न करने के लिए यह पिछले चाहते हैं और आप केवल match - [ इंडेक्सिंग दृष्टिकोण के साथ एक आकलन कर सकते हैं:

> x$isfruit <- y$isfruit[match(y$food, x$food)] 
> x 
    code food isfruit 
1 7 banana  fruit 
2 8 apple  fruit 
3 9 popcorn not fruit 

(जो भी आप पूछते हैं उसे करने के लिए मर्ज फ़ंक्शन में फेंकने के लिए कोई स्विच नहीं हैं।)