https://63freiestickmuster788.blogspot.com/2021/10/r-alphabetize-columns-order-functions.html