How to merge specific columns with its next column without hardcoding in R programming

Question

How to merge column names that are "X" with its next column without hardcode in R programming

X should be merged to Day.7 X.1 should be merged into Day.8 X.2 an