R/rowProds.R

Defines functions rowProds

## File Name: rowProds.R
## File Version: 1.03
rowProds <- function(matr)
{

# Call: from din()
# Input: numeric matrix with positive entries
# Output: row products of input matrix

    exp( rowSums( log(matr + 10^(-300) ) ) )

}
alexanderrobitzsch/CDM documentation built on July 3, 2024, 7:42 p.m.