Part 1: Read the data..
# reading external data and storing into a dataframe called "airline.df"
airline.df <- read.csv("BOMDELBOM.csv")
Part 2: Column names
# Display the column names
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"
Part 3: Data Dimensions
# Display the Data Dimensions
dim(airline.df)
## [1] 305 23
Part 4: Mean and SD of capacity
# mean of capacity
mean(airline.df$Capacity)
## [1] 176.3574
#SD of Capacity
sd(airline.df$Capacity)
## [1] 32.38868
Part 5: Mean and SD of FlyingMinutes
# mean of FlyingMinutes
mean(airline.df$FlyingMinutes)
## [1] 136.0328
#SD of FlyingMinutes
sd(airline.df$FlyingMinutes)
## [1] 4.705006
Part 6: Interpretation
# Mean of capacity > Mean of Flyingminutes
# Standard Deviation of FlyingMinutes < Capacity