0

Say i want to loop a list to the 10th element of said list. Can you tell me why code doesn't work?

loop <- function (list) {
  for (i in (list:list[[10]])) {
    df_i <- import(paste0(i))
  }
}
loop(list)

It returns:

Error in ord_dirs:ord_dirs[[10]] : NA/NaN argument
In addition: Warning messages:
1: In ord_dirs:ord_dirs[[10]] :
  numerical expression has 18 elements: only the first used
2: In pasardir(ord_dirs) : NAs introduced by coercion
3: In pasardir(ord_dirs) : NAs introduced by coercion
Roiadams
  • 19
  • 4

1 Answers1

0
loop <- function(list, x = 10) {

  df <- as.list(rep(NA, x))

  for (i in 1:x) {
    df[i] <- list[i]
  }

  df

}

list <- letters

loop(list)
Paul
  • 2,535
  • 1
  • 8
  • 26