Creación de matrices

Parte de la sección Lógica y flujo del Journey de R de Coddy. Lección 17 de 64.

Una matriz es un vector organizado en filas y columnas, y todos los valores tienen el mismo tipo. matrix(data, nrow = ...) la rellena columna por columna de forma predeterminada:

m <- matrix(1:6, nrow = 2)
print(m)

Salida:

     [,1] [,2] [,3]
[1,]    1    3    5
[2,]    2    4    6

Añade byrow = TRUE para rellenarla fila por fila, lo que coincide con los datos escritos una fila por línea:

m <- matrix(1:6, nrow = 2, byrow = TRUE)
print(m)

Salida:

     [,1] [,2] [,3]
[1,]    1    2    3
[2,]    4    5    6

Indica nrow o ncol; R calcula el otro a partir de la longitud de los datos.

dim(m) devuelve el número de filas y columnas, y nrow() y ncol() devuelven cada uno por separado. matrix(0, nrow = 2, ncol = 3) repite un único valor para llenar la matriz:

m <- matrix(0, nrow = 2, ncol = 3)
print(dim(m))
print(nrow(m) * ncol(m))
print(length(m))

Salida:

[1] 2 3
[1] 6
[1] 6

rbind() apila vectores como filas y cbind() como columnas, lo que crea una matriz a partir de vectores separados:

a <- c(1, 2, 3)
b <- c(4, 5, 6)
print(rbind(a, b))
print(dim(cbind(a, b)))

Salida:

  [,1] [,2] [,3]
a    1    2    3
b    4    5    6
[1] 3 2

Desafío

Fácil

Completa make_grid(values, n_cols). Devuelve una matriz con n_cols columnas que contenga values fila por fila. El número de valores siempre es un múltiplo de n_cols.

El código proporcionado lee los valores como una línea separada por comas y n_cols de la línea siguiente. Imprime cada fila de la matriz devuelta en su propia línea y, después, su tamaño como rows x columns.

Pruébalo tú mismo

make_grid <- function(values, n_cols) {
  # Escribe tu código aquí
  matrix(values)
}

# Código de entrada/salida suministrado: mantenlo como está
input <- suppressWarnings(readLines(file("stdin")))
values <- as.numeric(strsplit(input[1], ",")[[1]])
m <- make_grid(values, as.numeric(input[2]))
for (i in seq_len(nrow(m))) cat(m[i, ], "\n")
cat(nrow(m), "x", ncol(m), "\n")