Reading the data
setwd("d:/IIML/Term 5/DAM/")
airline.df<-read.csv("BOMDELBOM.csv")
Column name and dimension
colnames(airline.df)
## [1] "FlightNumber" "Airline" "DepartureCityCode"
## [4] "ArrivalCityCode" "DepartureTime" "ArrivalTime"
## [7] "Departure" "FlyingMinutes" "Aircraft"
## [10] "PlaneModel" "Capacity" "SeatPitch"
## [13] "SeatWidth" "DataCollectionDate" "DateDeparture"
## [16] "IsWeekend" "Price" "AdvancedBookingDays"
## [19] "IsDiwali" "DayBeforeDiwali" "DayAfterDiwali"
## [22] "MarketShare" "LoadFactor"
dim(airline.df)
## [1] 305 23
Descriptive statistics
mean(airline.df$FlyingMinutes)
## [1] 136.0328
sd(airline.df$FlyingMinutes)
## [1] 4.705006
mean(airline.df$Capacity)
## [1] 176.3574
sd(airline.df$Capacity)
## [1] 32.38868