在for循环的第一个空列中添加值

Question

我需要在data_frame_2的空列中的for循环中添加源于命令的值。必须按顺序将其添加到第一个空列中，以便每次迭代都将填充下一个空列。

for (product in products) {
condition_1 <- datasets[[product]]$price >= "450"
condition_2 <- datasets[[product]]$price < as.character(450 + 30)
subset_data_frame <- datasets[[product]][condition_1 & condition_2, ]
data_frame_2[, "next_empty_column"] <- colMeans(subset_data_frame)
writeLines(".", sep = "")
} #1

其中data_frame_2将是：因此应在循环的第一轮头4处填充head3的列 连续第二个。

 head 1  head 2  head 3 head 4 head 5

行1 a b不适用不适用不适用 第2行d不适用不适用不适用 第3行e f NA NA NA NA 第4 g h h NA NA NA