Fusion de données.des cadres avec des doublons

J'ai beaucoup de données.les cadres, par exemple:

df1 = data.frame(names=c('a','b','c','c','d'),data1=c(1,2,3,4,5))
df2 = data.frame(names=c('a','e','e','c','c','d'),data2=c(1,2,3,4,5,6))
df3 = data.frame(names=c('c','e'),data3=c(1,2))

et j'ai besoin de fusionner ces données.images, sans supprimer le nom des doublons

> result
  names data1 data2 data3
1  'a'    1    1      NA
2  'b'    2    NA     NA
3  'c'    3    4      1
4  'c'    4    5      NA
5  'd'    5    6      NA
6  'e'    NA   2      2       
7  'e'    NA   3      NA

Je ne peux pas trouver de fonction comme la fusion avec la possibilité de manipuler avec un un nom de doublons. Je vous remercie pour votre aide.
Pour définir mon problème. Les données proviennent d'expérimentation biologique, où un échantillon ont un nombre différent de répétitions. J'ai besoin de fusionner l'ensemble de l'expérience, et j'en ai besoin pour produire ce tableau. Je ne peux pas générer d'identificateur unique pour les répétitions.

InformationsquelleAutor user1291855 | 2012-03-25
  1. 4

    D'abord définir une fonction, run.seq, qui fournit les numéros de séquence pour les doublons, car il apparaît à partir de la sortie que ce qui est souhaité, c'est que le ie double de chaque nom dans chaque composante de la fusion de être associée. Ensuite, créez une liste des trames de données et ajouter un run.seq colonne pour chaque composant. Enfin l'utilisation des Reduce de fusionner tous.

    run.seq <- function(x) as.numeric(ave(paste(x), x, FUN = seq_along))

L <- list(df1, df2, df3)
L2 <- lapply(L, function(x) cbind(x, run.seq = run.seq(x$names)))

out <- Reduce(function(...) merge(..., all = TRUE), L2)[-2]

    La dernière ligne donne:

    > out
  names data1 data2 data3
1     a     1     1    NA
2     b     2    NA    NA
3     c     3     4     1
4     c     4     5    NA
5     d     5     6    NA
6     e    NA     2     2
7     e    NA     3    NA

    EDIT: Révisé run.seq de sorte que l'entrée n'a pas besoin d'être triés.

    • Cette solution fonctionne correctement que pour trier les données, mais il est ok pour moi. Merci beaucoup, vous êtes le plus grand. Pour cet exemple: df1 = données.cadre(names=c('a','b','c','d','c','c'),data1=c(1,2,3,4,5,6)) df2 = données.cadre(names=c('e','c','c','c'),data2=c(1,2,3,4)) il ne fonctionne pas sans le tri des noms.
    • Ont révisé run.seq de sorte que l'entrée n'a pas besoin d'être triés.
    InformationsquelleAutor G. Grothendieck
  2. 1

    Voir d'autres questions:

    Exemples:

    library(reshape)
out <- merge_recurse(L)

    ou

    library(plyr)

out<-join(df1, df2, type="full")
out<-join(out, df3, type="full")
*can be looped

    ou

    library(plyr)
out<-ldply(L)
    InformationsquelleAutor Etienne Low-Décarie
  3. 0

    Je pense qu'il n'est tout simplement pas assez d'informations dans votre exemple des trames de données pour ce faire. Qui 'c' dans dataframe 1 doit être couplé avec qui 'c' dans les données de l'image 2? Nous ne pouvons pas dire, de sorte que R ne peut pas. Je soupçonne que vous devrez ajouter une autre variable pour chacun de vos dataframes qui identifie de manière unique ces dupliquer cas.

    • Il n'est pas important le " c "dans le bloc de données 1 doit être couplé avec un" c " à partir des données de l'image 2 (je pense, que le premier sera le meilleur, et, quand tout sera couplé nouvelle ligne doit être créé). Je sais qu'avec les mêmes identifiants qu'il n'est pas si facile.
    InformationsquelleAutor Marius