library(tibble) df <- data.frame(b = c(1, 1, 1), c = c(2, 2, 2), d = c(3, 3, 3)) add_column(df, a = 0, .before = 1) # a b c d # 1 0 1 2 3 # 2 0 1 2 3 # 3 0 1 2 3