Как обучить весь список модели ИНС?

Question

Я хочу обучить весь список модели ИНС. Для этого мне нужно сначала масштабировать данные. Я использую этот код:

  for( i in seq_along(data_list)){

  max <- lapply(i[, -c(1)], max)
  min <- lapply(i[, -c(1)], min)
  scaled <- as.data.frame(scale(i[, -c(1)]), center = min, scale = max - min)


  train_scaled_i <- scaled[1:(nrow(i)-744),]
  test_scaled_i <- scaled[(nrow(i)-743):nrow(i),]
}

Я получаю эту ошибку.