# Alexandru Mardare

# 1701698


# Computing data & information systems HND 


# Statistical programming


# Task 2 Kickanalysis.r 


# Assignment 2 Task 2 R Programming


setwd("~/Documents") # Set the working directory


read.table('Kicks.csv' , header=T , sep = ',')  # Read from Excel file iris.csv from Documents


# Load data file results 



results<-read.csv("Kicks.csv", header=TRUE) # Read the dedicates iris.csv file


results <- read.csv("Kicks.csv") # Read the csv file


mean(x) # Work out mean result of the data 


median(x) # Work out median result of the data


max(x) # Work out max result of the data 


min(x) # Work out min result of the data 


range(x) # Work out range result of the data


sd(x) # Work out the standard deviation of the data 


shapiro.test(x) # Work out the shapiro test of the data