a=2
b=3
c=a+b
mba <- read.csv("C:\\Users\\yogesh.thimmegowda\\Desktop\\SKY\\Python Codes\\Basic Statistics _ Visualizations\\mba.csv")
attach(mba)
mean(workex) # Mean of Workexperience
## [1] 57.50194
mean(gmat) # Mean of GMAT
## [1] 711.1643
median(gmat) # Median of Gmat
## [1] 710
sd(gmat) # Stdev of Gmat
## [1] 29.33971
var(gmat)
## [1] 860.8188
sd(workex)
## [1] 27.38682
var(workex)
## [1] 750.0379
hist(gmat)
library(e1071)
## Warning: package 'e1071' was built under R version 3.4.4
skewness(gmat)
## [1] -0.5931675
kurtosis(gmat)
## [1] 1.141141
skewness(workex)
## [1] 2.598422
kurtosis(workex)
## [1] 13.26826
hist(workex)
barplot(gmat)