https://techbeamers.com/how-to-generate-random-numbers-in-r/