Как добавить в список матриц в R?

Учитывая набор данных 'train', содержащий 1607 строк и 256 столбцов, я хочу сделать каждую строку (с элементами 256 в каждой) матрицей 16x16 и иметь список для хранения 16x165891 из>59291 такие матрицы. Все наблюдения в данных train представляют собой значения между -1 и 1. Например, вектор-строка в train может быть

a <- seq(from = -1, to = 1, length = 256)

Когда я пытаюсь запустить такой цикл,

x <- lapply(1:nrow(train), matrix, data=0, nrow=16, ncol=16) #creates list of 1607 matrices of 0's
for (i in length(x)) {
   x[[i]] <- matrix(X_train[i,], nrow=16, ncol=16) #replace each element (matrix) of list x with a matrix of the same dimension from train
}

Я продолжаю получать один и тот же немодифицированный список x с матрицами 0 для всех элементов x. Что я делаю не так?