Hinzufügen eines ColSum zu Vektor in r mit dplyr

Question

Ich versuche, die Summe (von allen Zählungen in einem bestimmten Vektor) in meinem Datenrahmen in R hinzuzufügen. Insbesondere möchte ich alle Zählungen behalten und dann eine Summe hinzufügen Am Ende. In Excel würden Sie tun = Summe (A1: A5232). Außerdem kenne ich die Länge des spezifischen Vektors nicht. Siehe unten:

#sumarize by colname 
    NewDepartment <- List %>% 
    group_by(NewDepartment) %>% 
    tally(sort=TRUE) 

Der obige Code gibt mir folgendes:

    NewDepartment  n 
         <chr> <int> 
1       <NA> 709 
2     Collections 454 
3      Telesales 281 
4 Operations Control Management 93 
5     Underwriting 92 

Ich möchte eine Gesamtzählung am Ende wie folgt aus:

    NewDepartment  n 
         <chr> <int> 
1       <NA> 709 
2     Collections 454 
3      Telesales 281 
4 Operations Control Management 93 
5     Underwriting 92 
6     Total Sum  1721 

Wie erhalte ich die Zeile # 6 oben ??

Answer 1

Try this:

NewDepartment = rbind(NewDepartment, 
    data.frame(NewDepartment = "Total Sum", n = sum(NewDepartment$n)))