R Statistical Ananalysis