Basic Stats

10:00 PM Batch

mba <- read.csv("C:\\Users\\Admin\\Desktop\\SARLAKG\\mba.csv")
dim(mba)
## [1] 773   3
mean(mba$workex)
## [1] 57.50194
attach(mba)
mean(workex)
## [1] 57.50194
colnames(mba)
## [1] "datasrno" "workex"   "gmat"

Measures of Dispersion

sd(gmat)
## [1] 29.33971
var(gmat)
## [1] 860.8188
range <- max(gmat) - min(gmat)
range
## [1] 180
barplot(gmat)

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
boxplot(workex)

summary(mba)
##     datasrno       workex           gmat      
##  Min.   :  1   Min.   :  9.0   Min.   :600.0  
##  1st Qu.:194   1st Qu.: 41.0   1st Qu.:690.0  
##  Median :387   Median : 52.0   Median :710.0  
##  Mean   :387   Mean   : 57.5   Mean   :711.2  
##  3rd Qu.:580   3rd Qu.: 69.0   3rd Qu.:730.0  
##  Max.   :773   Max.   :279.0   Max.   :780.0
x <- mba[,3]