powered by
X
cholesky(X, tol = sqrt(.Machine$double.eps))
chol
gsorth
C <- matrix(c(1,2,3,2,5,6,3,6,10), 3, 3) # nonsingular, symmetric C cholesky(C) cholesky(C) %*% t(cholesky(C)) # check
Run the code above in your browser using DataLab