http://www.sthda.com/english/wiki/reordering-data-frame-columns-in-r
my_data2 <- my_data[, c(5, 4, 1, 2, 3)]