Data was cleaned and analysed using R version 4.0.5