Wie Sie merge-Tabellen in R?

Ich denke, das wird haben eine einfache Antwort, aber ich kann das nicht! Hier ist ein Beispiel für die Verwendung der iris dataset:

a <- table(iris[,2])
b <- table(iris[,3])

Wie füge ich diese beiden Tabellen zusammen? Zum Beispiel die variable 3 hätte einen Wert von 27 (26+1) und variable 3.3 einen Wert von 8 (6+2) in der neuen output-Tabelle.

Jede Hilfe sehr geschätzt.

InformationsquelleAutor JPD | 2012-10-15
  1. 8

    Diese arbeiten, wenn Sie wollen, verwenden Sie die Variablen, die in beiden a und b:

    n <- intersect(names(a), names(b))
a[n] + b[n]

#  3 3.3 3.5 3.6 3.7 3.8 3.9   4 4.1 4.2 4.4 
# 27   8   8   5   4   7   5   6   4   5   5

    Wenn Sie möchten, verwenden alle Variablen:

    n <- intersect(names(a), names(b)) 

res <- c(a[!(names(a) %in% n)], b[!(names(b) %in% n)], a[n] + b[n])

res[order(names(res))] # sort the results
    • +1 viel besser als meine.
    • Vielen Dank für diese. Kann es geändert werden, um zu halten die Werte, die nicht in beiden Datensätzen und nur ein aber? Ich brauche eine Summe, enthält alle Daten einschließlich der fusionierten gemeinsamen Werte, wie Sie Ihren code gezeigt hat.
    • Siehe das update meiner Antwort.
    • vielen Dank für das update. Mit der iris Beispiel, [-n] scheint ungültig zu sein.
    • Siehe meine Korrektur.
    • Das ist einen Schritt näher gerückt!!! Jedoch, 3.8 zum Beispiel tritt 3 mal in der resultierenden Tabelle. Im Idealfall ist die endgültige Tabelle erfassen würde nur die Summe der 2 Werte und nicht die Originale. Irgendeiner Weise zu halten, nur der kombinierte Wert, und entfernen Sie die anderen? Danke nochmal für Eure Hilfe.
    • Sorry, jetzt sollte es funktionieren.

    InformationsquelleAutor Sven Hohenstein
  2. 2
    temp<-merge(a,b,by='Var1')
temp$sum<-temp$Freq.x + temp$Freq.y

   Var1 Freq.x Freq.y sum
1     3     26      1  27
2   3.3      6      2   8
3   3.5      6      2   8
4   3.6      4      1   5
5   3.7      3      1   4
6   3.8      6      1   7
7   3.9      2      3   5
8     4      1      5   6
9   4.1      1      3   4
10  4.2      1      4   5
11  4.4      1      4   5
    • +1 schönes Gebrauch von merge()
    InformationsquelleAutor nograpes
  3. 2

    Ist hier ein anderes:

    transform(merge(a,b, by="Var1"), sum=Freq.x + Freq.y)
   Var1 Freq.x Freq.y sum
1     3     26      1  27
2   3.3      6      2   8
3   3.5      6      2   8
4   3.6      4      1   5
5   3.7      3      1   4
6   3.8      6      1   7
7   3.9      2      3   5
8     4      1      5   6
9   4.1      1      3   4
10  4.2      1      4   5
11  4.4      1      4   5
    InformationsquelleAutor johannes
  4. 1

    Hier ein bisschen gefoltert one-liner-version des merge() Lösung:

    do.call(function(Var1, Freq.x, Freq.y) data.frame(Var1=Var1, Freq=rowSums(cbind(Freq.x, Freq.y))), merge(a, b, by="Var1"))

    Hier ist die eins, wenn Sie verwenden möchten, alle Variablen:

    do.call(function(Var1, Freq.x, Freq.y) data.frame(Var1=Var1, Freq=rowSums(cbind(Freq.x, Freq.y), na.rm=TRUE)), merge(a, b, by="Var1", all=TRUE))

    Im Gegensatz zu den transform() one-liner, die es nicht sammeln .x und .y, so kann es verwendet werden iterativ.

    InformationsquelleAutor verbamour
  5. 0

    Der merge-Funktion der Daten.Tisch-Paket kann das sein, was Sie wollen: https://rpubs.com/ronasta/join_data_tables

    InformationsquelleAutor smoe
Schreibe einen Kommentar