mat = replicate (100,{x = matrix(data = rep(NA, 80), ncol = 2)})
for (k in 1:100)
{
mat[,,k]<-out$'k'$position
}
mat
Error in mat[, , k] <- out$’k’$position : number of items to replace is not a multiple of replacement length
Он отлично работает для mat[,,1]<-out$’1’$position, но когда я перебираю его 100 раз, возникает ошибка.
Вместо $ нужен out[[k]]$position
@ akrun: Большое спасибо. Эта ошибка устранена, но все еще в предыдущем вопросе после внесения этого изменения в код я не могу получить разные значения для s и cost для каждого k. Буду признателен, если вы попробуете ответить на предыдущий обновленный вопрос
Я проверю там





Нам нужно использовать [[ вместо $
for(k in 1:100) mat[,,k] <- out[[k]]$position
head(mat[,,1])
# [,1] [,2]
#[1,] 4 10
#[2,] 4 9
#[3,] 4 8
#[4,] 1 10
#[5,] 4 7
#[6,] 1 9
Я собирался опробовать ваше обновление, когда вы разместили новый вопрос