Is a matrix symmetric positive-definite?
ipd(mat)
A matrix
Returns either TRUE if symmetric positive-definite; or FALSE, printing a diagnostic message.
TRUE
FALSE
# NOT RUN { data(mtoys) stopifnot(ipd(crossprod(matrix(rnorm(30),10)))) stopifnot(ipd(M(toy_mhp))) # }
Run the code above in your browser using DataCamp Workspace