Calcule la factorización de Choleski de una array en programación R: función chol()

La función chol() en lenguaje R se usa para calcular la factorización de Choleski de una array cuadrada definida positiva simétrica real.
 

Sintaxis: chol(x, …)
Parámetros:  
x: un objeto para el que existe un método. El método predeterminado se aplica a arrays definidas positivas y simétricas reales. 
 

Ejemplo 1: 
 

# R program to illustrate
# chol function
 
# Initializing a matrix with
# 2 rows and 2 columns
x <- matrix(c(8, 1, 1, 4), 2, 2)
 
# Getting the matrix representation
x
 
# Calling the chol() function
y <- chol(x)
 
# Getting the Choleski factorization
# of the specified matrix
y

Producción: 
 

     [, 1] [, 2]
[1, ]    8    1
[2, ]    1    4

         [, 1]      [, 2]
[1, ] 2.828427 0.3535534
[2, ] 0.000000 1.9685020

Ejemplo 2: 
 

# R program to illustrate
# chol function
 
# Initializing a matrix with
# 2 rows and 2 columns
x <- matrix(c(1, 2, 3, 4), 2, 2)
 
# Getting the matrix representation
x
 
# Calling the chol() function
y <- chol(x)
 
# Getting the Choleski factorization
# of the specified matrix
y

Producción: 
 

     [, 1] [, 2]
[1, ]    1    3
[2, ]    2    4

Error in chol.default(x) : 
  the leading minor of order 2 is not positive definite
Calls: chol -> chol.default
Execution halted