Just use names()to assign it:
> scale_lab <- c("Very Poor", "Poor", "Average", "Good",
+ "Very Good", "Don't Know")
> scale_rep <- c("1","2","3","4","5","9")
> names(scale_lab) <- scale_rep
> scale_lab
1 2 3 4 5 9
"Very Poor" "Poor" "Average" "Good" "Very Good" "Don't Know"
> scale_lab["9"]
9
"Don't Know"
>
source
share