Hi can anyone help on the codes below? I keep getting error message "Error in splitdata[[i]] : subscript out of bounds". But splitdata is a list with 54 elements. Any advice appreciated.
for (i in (1:54)){
  if(rank == "best"){
    column1[i]<-splitdata[[c(i,1)]]
  }else if(rank == "worst"){
    column1[i]<-splitdata[[c(i,length(splitdata[[i]]))]]
  }else if(rank > length(splitdata[[i]])){
    column1[i]<-"NA"
  }else{
    column1[i]<-splitdata[[c(i,rank)]]}}
