https://researchdatapod.com/how-to-count-the-number-of-na-in-r/