How To Take Average In R Studio