Как привязать кадры данных в цикле for

Question

Я пытаюсь создать фрейм данных, объединенный из множества фреймов данных, созданных циклом for. Я знаю, что цикл не рекомендуется, но я чувствую себя более комфортно, используя его. Я перебираю список элементов в ключевой странице ключевого слова df.

То, что я сделал, работает нормально, но мой метод - создать все кадры данных с циклом for и объединять их только по окончании цикла for.

Я хотел бы иметь метод, который добавляет фрейм данных в стек предыдущих фреймов данных, созданных в цикле for, чтобы я мог удалить фрейм данных сразу после rbind в цикле for, а не в конце это.

i=1

for (page in as.character(df$website)){

  keywordA <- data.frame(matrix(page))
  keywordB <- data.frame(matrix("REVIEW"))
  keywordC <- data.frame(df$keyword_page[i])

  assign(paste0('table_page', i), data.frame(keywordA, keywordB, keywordC))

i <- i +1

}
table_page_all <- rbindlist(mget(ls(pattern = "^table_page\\d+")))
colnames(table_page_all) <- c("KEYWORD A", "KEYWORD B", "KEYWORD C")
rm(list = (ls(pattern = "^table_page\\d+")))

Спасибо!

Answer 1

Попробуйте это:

i=1
table_page_all  <- data.frame()
for (page in as.character(df$website)){

  keywordA <- data.frame(matrix(page))
  keywordB <- data.frame(matrix("REVIEW"))
  keywordC <- data.frame(df$keyword_page[i])


   i <- i +1
   table_page_all  <- rbind(table_page_all, data.frame(keywordA, keywordB, keywordC))
}

colnames(table_page_all) <- c("KEYWORD A", "KEYWORD B", "KEYWORD C")