Перекодирование значений нескольких переменных с одинаковым суффиксом в новую переменную с другим суффиксом в R

#r Вопрос: library(Hmisc) install.packages("expss") col1.5pt <- c(1,2,4,5) col2.5pt <- c(1,2,3,4) col3 <- c(3,4,5,1) col4.5pt <- c(2,3,2,4) col5 <- c(3,NA,4,5) df<- data.frame(col1.5pt,col2.5pt,col3,col4.5pt,col5) abc <- c("col1.5pt", "col2.5pt", "col4.5pt") cde <- c("col1.T2b", "col2.T2b",…