Как добавить каждую строку к предыдущей строке в цикле R

Question

Я пишу цикл в r, сообщение об ошибке приходит из последней строки: "Ошибка в match.names(clabs, names(xi)): имена не совпадают с предыдущими именами", последняя строка пытается сохранить значение каждой строки для каждый цикл вокруг. Спасибо всем.

a = 20 # resample times
for (id in unique_index){

  jeep_id <- jeep_boot[which(jeep$index == id),]

  #sample_size is 0.8 of the whole data
  sample_size <- floor((0.8)*length(jeep_id$PR))

  #bootstrap sample means 
  samplemeans = rep(NA, a)

  for (i in 1:a) {

    bootsample.i = sample(jeep_id$PR, sample_size, replace=T)
    samplemeans[i] = mean(bootsample.i)

  }
  #combine mean of 20 sample means and stand dieviation of sample means to be one row
  bootresult_id <- cbind(id, mean(samplemeans), sd(samplemeans))
  #retain every row value for each round looping 
  bootresult <- rbind(bootresult, bootresult_id)
} 

Answer 1

Что в bootresult прежде чем начать for (id in unique_index) цикл? Эта часть не была понятна мне, и, возможно, это зависит от того, как вы объявите это в первую очередь

Альтернативным решением для этого является объявить его

bootresult <- matrix(nrow = length(unique_index), ncol=3)

и заменить последнюю строку

bootresult[id, ] <- bootresult_id