R loop add another column instead of putting it down (Gephi export)

Question

This part is just for the example.

initmatrix <- matrix(c("A", "B", "C", "D", "E", "F", "G