R Error: replacement has [x] rows, data has [y]

Question

This seems basic, but i\'m simply not able to solve it or find the wrong part. The code is:

for (step_i in 1:7) {
  cat("=== Step ", step_i, ": Fin