我如何将以下循环结果存储在单个向量中，并保持其顺序？ Obs.: print() 仅用于 reprex 目的。

我已经尝试使用 sapply() 但它重新排序了结果。

meses = c("jan", "fev", "mar", "abr", "mai", "jun",
          "jul", "ago", "set", "out", "nov", "dez", "total")

colunas = c("orcado", "realizado", "desvio", "desvio%")

nomes = NULL

for (x in meses) {
  print(paste(colunas, x, sep = "_"))
}
#> [1] "orcado_jan"    "realizado_jan" "desvio_jan"    "desvio%_jan"  
#> [1] "orcado_fev"    "realizado_fev" "desvio_fev"    "desvio%_fev"  
#> [1] "orcado_mar"    "realizado_mar" "desvio_mar"    "desvio%_mar"  
#> [1] "orcado_abr"    "realizado_abr" "desvio_abr"    "desvio%_abr"  
#> [1] "orcado_mai"    "realizado_mai" "desvio_mai"    "desvio%_mai"  
#> [1] "orcado_jun"    "realizado_jun" "desvio_jun"    "desvio%_jun"  
#> [1] "orcado_jul"    "realizado_jul" "desvio_jul"    "desvio%_jul"  
#> [1] "orcado_ago"    "realizado_ago" "desvio_ago"    "desvio%_ago"  
#> [1] "orcado_set"    "realizado_set" "desvio_set"    "desvio%_set"  
#> [1] "orcado_out"    "realizado_out" "desvio_out"    "desvio%_out"  
#> [1] "orcado_nov"    "realizado_nov" "desvio_nov"    "desvio%_nov"  
#> [1] "orcado_dez"    "realizado_dez" "desvio_dez"    "desvio%_dez"  
#> [1] "orcado_total"    "realizado_total" "desvio_total"    "desvio%_total"

^{由 reprex package 创建于 2020-07-17 (v0.3.0)}