You could use dplyr::tribble().
dplyr::tribble(
~AB, ~YS, ~QS, ~QC, ~HF, ~KJ, ~PL, ~KN,
"RD", 1, 3, 5, 7, 9, 11, 13,
"CS", 2, 4, 6, 8, 10, 12, 14
)
#> # A tibble: 2 x 8
#> AB YS QS QC HF KJ PL KN
#> <chr> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl>
#> 1 RD 1 3 5 7 9 11 13
#> 2 CS 2 4 6 8 10 12 14
Created on 2021-12-06 by the reprex package (v2.0.1)