Contains R codes from my data analysis works