Basics of STats

mba <- read.csv("C:\\Users\\Admin\\Desktop\\SARLAKG\\mba.csv")


View(mba)

dim(mba)

## [1] 773   3

head(mba,3)

##   data.srno workex gmat
## 1         1     21  720
## 2         2    107  640
## 3         3     57  740

tail(mba,2)

##     data.srno workex gmat
## 772       772     10  610
## 773       773     52  620

colnames(mba)

## [1] "data.srno" "workex"    "gmat"

attach(mba)

mean(gmat)

## [1] 711.1643

mean(workex)

## [1] 57.50194

median(gmat)

## [1] 710

mode(gmat)

## [1] "numeric"

second Moment of Business Decision

var(gmat)

## [1] 860.8188

sd(gmat)

## [1] 29.33971

range(gmat)

## [1] 600 780

range <- max(gmat)-min(gmat)
range

## [1] 180

Third & Fourth Moment of Business Decision

windows()
hist(workex)

library(moments)

## Warning: package 'moments' was built under R version 3.4.4

skewness(workex)

## [1] 2.603472

kurtosis(workex)

## [1] 16.31043

windows()

hist(data.srno)

skewness(data.srno)

## [1] 0

kurtosis(data.srno)

## [1] 1.799996

windows()
barplot(gmat)