https://researchdatapod.com/how-to-solve-r-warning-aggregate-function-missing-defaulting-to-length/