R/tam_solve_ridge.R

Defines functions tam_solve_ridge

## File Name: tam_solve_ridge.R
## File Version: 0.01

tam_solve_ridge <- function(x, ridge)
{
    diag(x) <- diag(x) + ridge
    return( solve(x) )
}
alexanderrobitzsch/TAM documentation built on Sept. 16, 2024, 2:04 a.m.