rowsum - Omit inf from row sum in R

Question

So I am trying to sum the rows of a matrix, and there are inf's within it. How do I sum the row, omitting the inf's?

Answer 1

Multiply your matrix by the result of is.finite(m) and call rowSums on the product with na.rm=TRUE. This works because Inf*0 is NaN.

m <- matrix(c(1:3,Inf,4,Inf,5:6),4,2)
rowSums(m*is.finite(m),na.rm=TRUE)