dplyr select column based on string match

Question

I am wanting to order my columns of a data frame by string matches.

library(dplyr)
data <- data.frame(start_a = 1,
           start_f = 3,
           end_a = 5