¿Cómo crear la array de identidad en R?

En este artículo, discutiremos cómo crear una array de identidad en el lenguaje de programación R.

Las arrays identidad son las arrays que contienen todos los ceros, excepto los elementos diagonales que equivalen a 1. Las arrays identidad son siempre de naturaleza cuadrada. Base R proporciona una gran cantidad de métodos para crear y definir las arrays de identidad en R: 

Método 1: Usar el método de diagnóstico

El método diag() en base R se usa para crear una array cuadrada con las dimensiones especificadas. Se asigna el valor de la diagonal a 1 y al resto de todos los elementos se les asigna el valor de 0. 

Sintaxis :

diag(num)

donde, num – El número equivalente al número de filas y columnas de la array. 

Ejemplo :

# creating a diagonal matrix with 
# dimensions 3 x 3
diag_mat < - diag(3)
  
# printing identity matrix
print("Identity Matrix")
print(diag_mat)

Producción:

[1] "Identity Matrix" 
     [,1] [,2] [,3] 
[1,]    1    0    0 
[2,]    0    1    0 
[3,]    0    0    1

Método 2: Usar el método diag(nrow)

El método diag(nrow) se puede utilizar para especificar el número de filas de la array identidad. Asigna el número de columnas equivalente al número especificado de filas. 

Sintaxis :

diag(nrow = )

donde,  nrow – El número de filas de la array identidad

Ejemplo :

# creating a diagonal matrix with 
# dimensions 7 x 7
diag_mat < -diag(nrow=7)
  
# printing identity matrix
print("Identity Matrix")
print(diag_mat)

Producción:

[1] "Identity Matrix"
> print(diag_mat)
    [,1] [,2] [,3] [,4] [,5] [,6] [,7]
[1,]    1    0    0    0    0    0    0
[2,]    0    1    0    0    0    0    0
[3,]    0    0    1    0    0    0    0
[4,]    0    0    0    1    0    0    0
[5,]    0    0    0    0    1    0    0
[6,]    0    0    0    0    0    1    0
[7,]    0    0    0    0    0    0    1

Método 3: crear una array de ceros y luego asignar diagonales a 1 

El método matrix() en R se puede usar para crear una array con un valor específico y asignarlo al número de filas y columnas declaradas de la array. 

Sintaxis :

matrix ( val , rows, cols)

Parámetros: 

• val: el valor que se asignará a todas las celdas
• filas: las filas de la array de identidad
• cols – Las columnas de la array identidad

Ejemplo :

Inicialmente creamos una array de 0 y luego a las diagonales se les asignan 1 usando el método diag() definido anteriormente. 

# defining number of rows and columns
row < - 6
col < - 6
  
# creating a diagonal matrix with
# dimensions 6 x 6
diag_mat < - matrix(0, row, col)
  
# specifying the diagonal value to be 1
diag(diag_mat) < - 1
  
# printing identity matrix
print("Identity Matrix")
print(diag_mat)

Producción:

[1] "Identity Matrix"
> print(diag_mat)
    [,1] [,2] [,3] [,4] [,5] [,6]
[1,]    1    0    0    0    0    0
[2,]    0    1    0    0    0    0
[3,]    0    0    1    0    0    0
[4,]    0    0    0    1    0    0
[5,]    0    0    0    0    1    0
[6,]    0    0    0    0    0    1