| countones | R Documentation | 
countones used in the base function 'apply', or 'tapply' to count the number of ones in a vector
countones(invect)
| invect | vector of values | 
A single value of zero or the number of ones
x <- matrix(trunc(runif(20)*10),nrow=4,ncol=5)
print(x)
apply(x,1,countones)  # by rows
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.