Basic analysis using R added