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]