Sum across multiple columns with dplyr

by

dplyr >= 1.0.0 using across

sum up each row using rowSums (rowwise works for any aggreation, but is slower)

df %>%
   replace(is.na(.), 0) %>%
   mutate(sum = rowSums(across(where(is.numeric))))

sum down each column

df %>%
   summarise(across(everything(), ~ sum(., is.na(.), 0)))

dplyr < 1.0.0

sum up each row

df %>%
   replace(is.na(.), 0) %>%
   mutate(sum = rowSums(.[1:5]))

sum down each column using superseeded summarise_all:

df %>%
   replace(is.na(.), 0) %>%
   summarise_all(funs(sum))

More Related Contents:

  1. Gather multiple sets of columns
  2. How to get summary statistics by group
  3. Is there a dplyr equivalent to data.table::rleid?
  4. Replace NA with previous or next value, by group, using dplyr
  5. Filter rows which contain a certain string
  6. Calculate group mean, sum, or other summary stats. and assign column to original data
  7. Display / print all rows of a tibble (tbl_df)
  8. How to strsplit different number of strings in certain column by do function
  9. Finding Overlaps between interval sets / Efficient Overlap Joins
  10. R dplyr rolling sum
  11. How to remove rows with any zero value
  12. Why is enquo + !! preferable to substitute + eval
  13. Assign intermediate output to temp variable as part of dplyr pipeline
  14. Select columns based on string match – dplyr::select
  15. Delete columns/rows with more than x% missing
  16. How to aggregate a dataframe by week?
  17. Removing NA observations with dplyr::filter()
  18. adding default values to item x group pairs that don’t have a value (df %>% spread %>% gather seems strange)
  19. Filling missing dates in a grouped time series – a tidyverse-way?
  20. dplyr mutate rowwise max of range of columns
  21. dplyr: lead() and lag() wrong when used with group_by()
  22. Reorder rows using custom order
  23. Canonical tidyverse method to update some values of a vector from a look-up table
  24. Spreading a two column data frame with tidyr
  25. R dplyr rowwise mean or min and other methods?
  26. How to combine ggplot and dplyr into a function?
  27. Run a custom function on a data frame in R, by group
  28. Dealing with spaces and “weird” characters in column names with dplyr::rename()
  29. Filtering rows in R unexpectedly removes NAs when using subset or dplyr::filter
  30. Count how many values in some cells of a row are not NA (in R)

Leave a Comment