powered by
This is the simplest function ever. It's just an apply to sum across columns.
sfunction(x)
apply(x, 2, sum)
capture histories, as numbers
Kristian Lum kl@hrdag.org
## The function is currently defined as sfunction <- function(x) { out <- apply(x, 2, sum) }
Run the code above in your browser using DataLab