Каким образом один блок данных растиражировать и поставить один над другим(без цикла)

Подскажите пожалуйста. У меня имеется таблица(8 столбцов и 29 строк) и мне нужно ее растиражировать(29 раз) и каждый одинаковый блок(таблицу) поставить 1 над другим(но БЕЗ ЦИКЛА) с циклом получается, но нужно именно понять, как это сделать не прибегая к циклу! вот пример что нужно получить(с помощью цикла) и то же самое хочется узнать, как сделать не используя цикл.

one<-конкретная база данных

nr<-nrow(one)

nc<-8

km<-data.frame(one[c(1:nr),c(1:nc)])

ckm<-km[1,]

ncc<-ncol(one)-8

for(i in 1:ncc) {ckm<-rbind(ckm,km)}

ckm<-ckm[-1,]

Вот пример на картинке: