Comment faire pour fusionner sur une colonne par un autre nom de données.

Question

Je me demande s'il y a une meilleure façon de mettre deux data.frames en un, en traitant les noms comme si c'était une colonne et ensuite fusionner par cette colonne avec un autre data.frame. Je sais que je pouvais faire ce qui suit

df1$rn <- row(df1) 
all <- merge(df1,df2, by.x="rn", by.y="some_column") 

Je veux dire cela produit des données redondantes (rownames comme colonne) qui ne sont pas nécessaires du tout. Alors, quelle est la façon la plus intelligente de le faire?

Answer 1

Vous pouvez utiliser "row.names" ou 0 comme index pour les noms de ligne.

Un exemple en utilisant le authors et books de merge aide:

rownames(authors) <- authors$surname 
merge(authors, books, by.x = "row.names", by.y = "name") 

Answer 2

« Une façon plus intelligente » dépend vraiment de vos données, que nous n'avons pas. mais

df1 <- data.frame(
    X1 = 1:10, 
    id = letters[1:10] 
) 

df2 <- data.frame(
    X2 = 10:1, 
    X3 = letters[11:20] 
) 
rownames(df2) <- df1$id 
df2 <- df2[sample.int(10),] 

cbind(df1,df2[match(df1$id,rownames(df2)),]) 

Modifier: La réponse de Vitoshka est celle que vous cherchez. Si je avais pris la peine de regarder les fichiers d'aide de ?merge, je l'aurais su que bien ...

Je laisse ma solution ici juste au cas où quelqu'un a besoin d'une solution de rechange rapide de fusionner:

> system.time(replicate(1000,cbind(df1,df2[match(df1$id,rownames(df2)),]))) 
    user system elapsed 
    0.57 0.00 0.57 
> system.time(replicate(1000,merge(df1,df2,by.x="id",by.y="row.names"))) 
    user system elapsed 
    2.36 0.02 2.37