R Блестящий текст в обновлении сюжета, но не данные

results = []
chunk_size = 10
while(array.length > 0){
   results.push(array.splice(0, chunk_size))
}