Week 13; Simulating Descriptive measures of univariate, bivariate and multivariate with R one and two variable in testing of hypothesis about means with R