Scilab Website | Contribute with GitLab | Mailing list archives | ATOMS toolboxes
Scilab Online Help
2024.1.0 - Русский


spchol

sparse cholesky factorization

Syntax

[R,P] = spchol(X)

Arguments

X

symmetric positive definite real sparse matrix

P

permutation matrix

R

cholesky factor

Description

[R,P] = spchol(X) produces a lower triangular matrix R such that P*R*R'*P' = X.

Examples

// Factorization:
Xfull = [
3.,  0.,  0.,  2.,  0.,  0.,  2.,  0.,  2.,  0.,  0.
0.,  5.,  4.,  0.,  0.,  0.,  0.,  0.,  0.,  0.,  0.
0.,  4.,  5.,  0.,  0.,  0.,  0.,  0.,  0.,  0.,  0.
2.,  0.,  0.,  3.,  0.,  0.,  2.,  0.,  2.,  0.,  0.
0.,  0.,  0.,  0. , 5.,  0.,  0.,  0.,  0.,  0.,  4.
0.,  0.,  0.,  0.,  0.,  4.,  0.,  3.,  0.,  3.,  0.
2.,  0.,  0.,  2.,  0.,  0.,  3.,  0.,  2.,  0.,  0.
0.,  0.,  0.,  0.,  0.,  3.,  0.,  4.,  0.,  3.,  0.
2.,  0.,  0.,  2.,  0.,  0.,  2.,  0.,  3.,  0.,  0.
0.,  0.,  0.,  0.,  0.,  3.,  0.,  3.,  0.,  4.,  0.
0.,  0.,  0.,  0.,  4.,  0.,  0.,  0.,  0.,  0.,  5.];
X = sparse(Xfull);

[R, P] = spchol(X);
max(P*R*R'*P'-X)

// Factorization and solve with backslash operator:
Afull = [
2 -1  0  0  0;
-1  2 -1  0  0;
0 -1  2 -1  0;
0  0 -1  2 -1;
0  0  0 -1  2
];
A = sparse(Afull);

[L, P] = spchol(A);
max(P*L*L'*P'-A)

n = size(A, "r"); e = (1:n)'; b = A * e;
x = P*(L'\(L\(P'*b)));
A*x-b

See also

  • sparse — sparse matrix definition
  • lusolve — sparse linear system solver
  • luget — extraction of sparse LU factors
  • chol — Cholesky factorization
Report an issue
<< lusolve Sparse Decompositions Linear Equations (Iterative Solvers) >>

Copyright (c) 2022-2024 (Dassault Systèmes)
Copyright (c) 2017-2022 (ESI Group)
Copyright (c) 2011-2017 (Scilab Enterprises)
Copyright (c) 1989-2012 (INRIA)
Copyright (c) 1989-2007 (ENPC)
with contributors
Last updated:
Mon Jun 17 17:55:06 CEST 2024