for(i in 1:3) { # Head of for-loop new_value <- i * (- 1) # Creating new value my_vec <- c(my_vec, new_value) # Appending new value to vector }