Wie man rowSums für ausgewählte Spalten in R

Ich bin ein Neuling auf R und Hilfe zum berechnen von Summen der ausgewählten Spalte für jede Zeile. Meine einfache Daten-frame ist wie folgt. 

data = data.frame(location = c("a","b","c","d"),
            v1 = c(3,4,3,3), v2 = c(4,56,3,88), v3 =c(7,6,2,9), v4=c(7,6,1,9),
            v5 =c(4,4,7,9), v6 = c(2,8,4,6))

Möchte ich die Summe der Spalten V1 bis V3 und V4 bis V6 für meine jede Zeile in eine neue Daten-frame.

   x1   x2
a  14   13   
b  66   18
c
d

Tat ich etwas, was wie unten. 

rowSums(data[,2:4][,5:7])

Aber etwas falsch sein sollte in meinen codes. Vielen Dank im Voraus für jede Hilfe.

InformationsquelleAutor sriya | 2016-05-07
  1. 2

    Hier ist eine ziemlich einfache Lösung mit apply.

    output <- data.frame( x1 = apply(data[2:4], 1, sum) ,
                      x2 = apply(data[5:7], 1, sum) )

    Ergebnis:

    output
>    x1 x2
> 1  14 13
> 2  66 18
> 3   8 12
> 4 100 24
    InformationsquelleAutor rafa.pereira
  2. 1

    Mein Gefühl wäre, die Nutzung dply:

    require(dply)
data %>% mutate(v2v4 = rowSums(.[2:4])) %>% mutate(v4v6 = rowSums(.[5:7])) %>% select(-(location:v6))

    Ergebnis:

    > newDf <- data %>% mutate(v2v4 = rowSums(.[2:4])) %>% mutate(v4v6 = rowSums(.[5:7])) %>% select(-(location:v6))
> newDf
  v2v4 v4v6
1   14   13
2   66   18
3    8   12
4  100   24
    InformationsquelleAutor Technophobe01
  3. 1

    OK, wenn Sie eine separate dataframe:

    > data.frame(X1=rowSums(data[,2:4]), X2=rowSums(data[,5:7]))
    • diese Antwort nicht wieder den gewünschten Ausgang in data.frame
    • Ich habe nie gesagt, dass es tut. Ich habe gesagt, Sie müssen zu verwenden rowSums(data[,c(2:4,5:7)]) statt rowSums(Daten[,2:4][,5:7]). Wenn Sie ein dataframe, die Sie gerade brauchen, um zu kombinieren.
    • Ich immer noch denke, dass Ihre Antwort nicht zur Rückgabe des Ergebnisses gebeten, für die Fragen, das wäre eine data.frame wie die, die Sie sehen können, in den anderen Antworten
    • Sind Sie sicher?. Überprüfen Sie das Ergebnis, es ist eine Daten.Rahmen
    • Ja, es ist jetzt die RÜCKFÜHRUNG einer Daten.Rahmen, aber es ist immer noch nicht wieder die gewünschte Ausgabe oben in der Frage.
    InformationsquelleAutor Juanjo
  4. 1
    rowSums(cbind(mydata$variable1, mydata$variable2, mydata$variable3), na.rm = T )
    InformationsquelleAutor useR
  5. 0

    Angabe der beiden Summen explizit:

    cbind(x1=rowSums(data[,c('v1','v2','v3')]),x2=rowSums(data[,c('v4','v5','v6')]));
##       x1 x2
## [1,]  14 13
## [2,]  66 18
## [3,]   8 12
## [4,] 100 24
    • die tatsächlichen Daten Sammlung hat bekam große Anzahl von Variablen.
    InformationsquelleAutor bgoldst
  6. 0

    Können wir split dem dataset in eine list und verwenden Sie dann Reduce mit f="+".

    sapply(split.default(data[-1], rep(paste0("x", 1:2), each=3)), Reduce, f=`+`)
#     x1 x2
#[1,]  14 13
#[2,]  66 18
#[3,]   8 12
#[4,] 100 24
    • Alle Antworten, die gut funktionieren. Danke . @Akrun was bedeutet Reduzieren, f='+' geben Sie hier bitte?
    • ist der Aufruf der Funktion innerhalb der Reduce. Es hat die Summe der von jedem element in eine bestimmte Zeile der Daten.frame.
    InformationsquelleAutor akrun
Schreibe einen Kommentar