Encuentre el índice de fila y columna del valor máximo y mínimo en una array en R

En este artículo, discutiremos cómo encontrar el valor máximo y mínimo en cualquier array dada e imprimir su índice de fila y columna en el lenguaje de programación R.

Ejemplo:

Input: 11   -9   36
       20    1   81
       13   99   77
       
Output: maximum value: 99
        row col
         3   2
        
        minimum value: -9
        row col
         1   2

Encontrar el valor máximo:

  • En el siguiente código, hemos creado una array de muestra, en la que hemos pasado » nrow=3 » (la array tendrá solo 3 filas) en el ejemplo 1 y » ncol=2 » (la array tendrá solo 2 columnas) en el ejemplo 2 . 
  • Luego, hemos impreso la array de muestra en la siguiente línea con el mensaje «Array de muestra».
  • Luego, usamos la sintaxis a continuación para encontrar el número de fila y columna del elemento máximo y lo almacenamos en la variable «max». Hemos hecho uso de la función max() que se usa para encontrar el elemento máximo presente en un objeto . Este objeto puede ser un vector, una lista, una array, un marco de datos, etc. 
  • La función » cuál()» se utiliza para obtener el índice o la posición del valor que satisface la condición dada . Luego hemos impreso el valor máximo junto con su índice de fila y columna. 

Sintaxis : which(m == max(m), arr.ind=TRUE)

Ejemplo 1:

R

# defining a sample matrix
m = matrix(c(11, 20, 13, -9, 1, 99, 36, 81, 77), 
           nrow = 3)  
  
print("Sample Matrix:")
print(m)
  
# stores indexes of max value 
max = which(m == max(m), arr.ind = TRUE)  
print(paste("Maximum value: ", m[max]))
print(max)

Producción:

[1] "Sample Matrix:"
     [,1] [,2] [,3]
[1,]   11   -9   36
[2,]   20    1   81
[3,]   13   99   77

[1] "Maximum value:  99"
     row col
[1,]   3   2

Ejemplo 2:

R

# defining a sample matrix
m = matrix(c(1:16), ncol = 2)  
print("Sample Matrix:")
print(m)
  
# stores indexes of max value
max = which(m == max(m), arr.ind=TRUE)   
print(paste("Maximum value: ",m[max]))
print(max)

Producción:

[1] "Sample Matrix:"
     [,1] [,2]
[1,]    1    9
[2,]    2   10
[3,]    3   11
[4,]    4   12
[5,]    5   13
[6,]    6   14
[7,]    7   15
[8,]    8   16

[1] "Maximum value:  16"
     row col
[1,]   8   2

Encontrar el valor mínimo:

  • En el siguiente código, hemos creado una array de muestra, en la que hemos pasado » nrow=3 » (la array tendrá solo 3 filas) en el ejemplo 1 y » ncol=8 » (la array tendrá solo 8 columnas) en el ejemplo 2 como parámetro al definir la array. 
  • Luego, hemos impreso la array de muestra en la siguiente línea con el mensaje «Array de muestra». 
  • Luego, usamos la sintaxis a continuación para encontrar el número de fila y columna del elemento mínimo y lo almacenamos en la variable «min». Hemos hecho uso de la función min() que se usa para encontrar el elemento mínimo presente en un objeto. Este objeto puede ser un vector, una lista, una array, un marco de datos, etc. 
  • La función «cuál()» se utiliza para obtener el índice o la posición del valor que satisface la condición dada. Luego hemos impreso el valor mínimo junto con su índice de fila y columna. 

Sintaxis : cual(m == min(m), arr.ind=TRUE)

Ejemplo 1:

R

# defining a sample matrix
m = matrix(c(11, 20, 13, -9, 1, 99, 36, 81, 77), nrow = 3)  
print("Sample Matrix:")
print(m)
  
# stores indexes of min value
min = which(m == min(m), arr.ind = TRUE)  
print(paste("Minimum value: ", m[min]))
print(min)

Producción:

[1] "Sample Matrix:"
     [,1] [,2] [,3]
[1,]   11   -9   36
[2,]   20    1   81
[3,]   13   99   77

[1] "Minimum value:  -9"
     row col
[1,]   1   2

Ejemplo 2:

R

# defining a sample matrix
m = matrix(c(1:16), ncol = 8)  
print("Sample Matrix:")
print(m)
  
# stores indexes of min value 
min = which(m == min(m), arr.ind = TRUE) 
print(paste("Minimum value: ", m[min]))
print(min)

Producción:

[1] "Sample Matrix:"
     [,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8]
[1,]    1    3    5    7    9   11   13   15
[2,]    2    4    6    8   10   12   14   16

[1] "Minimum value:  1"
     row col
[1,]   1   1

Publicación traducida automáticamente

Artículo escrito por sudhanshublaze y traducido por Barcelona Geeks. The original can be accessed here. Licence: CCBY-SA

Deja una respuesta

Tu dirección de correo electrónico no será publicada. Los campos obligatorios están marcados con *