https://researchdatapod.com/how-to-transpose-a-data-frame-in-r/