basic Stats

a<-read.csv("C:/Users/lenovo/Downloads/Q7.csv")
View(a)
attach(a)
colnames(a)

## [1] "X"    "drat" "wt"   "qsec"

mean(drat)

## [1] 3.596563

median(drat)

## [1] 3.695

mode(drat)

## [1] "numeric"

sd(drat)

## [1] 0.5346787

var(drat)

## [1] 0.2858814

range(drat)

## [1] 2.76 4.93

##cloloum wt
mean(wt)

## [1] 3.21725

median(wt)

## [1] 3.325

mode(wt)

## [1] "numeric"

sd(wt)

## [1] 0.9784574

var(wt)

## [1] 0.957379

range(wt)

## [1] 1.513 5.424

## coloum qsec
mean(qsec)

## [1] 17.84875

median(qsec)

## [1] 17.71

mode(qsec)

## [1] "numeric"

sd(qsec)

## [1] 1.786943

var(qsec)

## [1] 3.193166

range(qsec)

## [1] 14.5 22.9