data<-read.csv("airline_safety.csv")
data<-data.frame(data)
dim(data)## [1] 56 8data## airline avail_seat_km_per_week incidents_85_99
## 1 Aer Lingus 320906734 2
## 2 Aeroflot* 1197672318 76
## 3 Aerolineas Argentinas 385803648 6
## 4 Aeromexico* 596871813 3
## 5 Air Canada 1865253802 2
## 6 Air France 3004002661 14
## 7 Air India* 869253552 2
## 8 Air New Zealand* 710174817 3
## 9 Alaska Airlines* 965346773 5
## 10 Alitalia 698012498 7
## 11 All Nippon Airways 1841234177 3
## 12 American* 5228357340 21
## 13 Austrian Airlines 358239823 1
## 14 Avianca 396922563 5
## 15 British Airways* 3179760952 4
## 16 Cathay Pacific* 2582459303 0
## 17 China Airlines 813216487 12
## 18 Condor 417982610 2
## 19 COPA 550491507 3
## 20 Delta / Northwest* 6525658894 24
## 21 Egyptair 557699891 8
## 22 El Al 335448023 1
## 23 Ethiopian Airlines 488560643 25
## 24 Finnair 506464950 1
## 25 Garuda Indonesia 613356665 10
## 26 Gulf Air 301379762 1
## 27 Hawaiian Airlines 493877795 0
## 28 Iberia 1173203126 4
## 29 Japan Airlines 1574217531 3
## 30 Kenya Airways 277414794 2
## 31 KLM* 1874561773 7
## 32 Korean Air 1734522605 12
## 33 LAN Airlines 1001965891 3
## 34 Lufthansa* 3426529504 6
## 35 Malaysia Airlines 1039171244 3
## 36 Pakistan International 348563137 8
## 37 Philippine Airlines 413007158 7
## 38 Qantas* 1917428984 1
## 39 Royal Air Maroc 295705339 5
## 40 SAS* 682971852 5
## 41 Saudi Arabian 859673901 7
## 42 Singapore Airlines 2376857805 2
## 43 South African 651502442 2
## 44 Southwest Airlines 3276525770 1
## 45 Sri Lankan / AirLanka 325582976 2
## 46 SWISS* 792601299 2
## 47 TACA 259373346 3
## 48 TAM 1509195646 8
## 49 TAP - Air Portugal 619130754 0
## 50 Thai Airways 1702802250 8
## 51 Turkish Airlines 1946098294 8
## 52 United / Continental* 7139291291 19
## 53 US Airways / America West* 2455687887 16
## 54 Vietnam Airlines 625084918 7
## 55 Virgin Atlantic 1005248585 1
## 56 Xiamen Airlines 430462962 9
## fatal_accidents_85_99 fatalities_85_99 incidents_00_14
## 1 0 0 0
## 2 14 128 6
## 3 0 0 1
## 4 1 64 5
## 5 0 0 2
## 6 4 79 6
## 7 1 329 4
## 8 0 0 5
## 9 0 0 5
## 10 2 50 4
## 11 1 1 7
## 12 5 101 17
## 13 0 0 1
## 14 3 323 0
## 15 0 0 6
## 16 0 0 2
## 17 6 535 2
## 18 1 16 0
## 19 1 47 0
## 20 12 407 24
## 21 3 282 4
## 22 1 4 1
## 23 5 167 5
## 24 0 0 0
## 25 3 260 4
## 26 0 0 3
## 27 0 0 1
## 28 1 148 5
## 29 1 520 0
## 30 0 0 2
## 31 1 3 1
## 32 5 425 1
## 33 2 21 0
## 34 1 2 3
## 35 1 34 3
## 36 3 234 10
## 37 4 74 2
## 38 0 0 5
## 39 3 51 3
## 40 0 0 6
## 41 2 313 11
## 42 2 6 2
## 43 1 159 1
## 44 0 0 8
## 45 1 14 4
## 46 1 229 3
## 47 1 3 1
## 48 3 98 7
## 49 0 0 0
## 50 4 308 2
## 51 3 64 8
## 52 8 319 14
## 53 7 224 11
## 54 3 171 1
## 55 0 0 0
## 56 1 82 2
## fatal_accidents_00_14 fatalities_00_14
## 1 0 0
## 2 1 88
## 3 0 0
## 4 0 0
## 5 0 0
## 6 2 337
## 7 1 158
## 8 1 7
## 9 1 88
## 10 0 0
## 11 0 0
## 12 3 416
## 13 0 0
## 14 0 0
## 15 0 0
## 16 0 0
## 17 1 225
## 18 0 0
## 19 0 0
## 20 2 51
## 21 1 14
## 22 0 0
## 23 2 92
## 24 0 0
## 25 2 22
## 26 1 143
## 27 0 0
## 28 0 0
## 29 0 0
## 30 2 283
## 31 0 0
## 32 0 0
## 33 0 0
## 34 0 0
## 35 2 537
## 36 2 46
## 37 1 1
## 38 0 0
## 39 0 0
## 40 1 110
## 41 0 0
## 42 1 83
## 43 0 0
## 44 0 0
## 45 0 0
## 46 0 0
## 47 1 3
## 48 2 188
## 49 0 0
## 50 1 1
## 51 2 84
## 52 2 109
## 53 2 23
## 54 0 0
## 55 0 0
## 56 0 0Are previous incidents predictive for feature incidents
What are the cases, and how many are there?
Each case represents a Airline all around the world. There 56 observations in the given data set.
Describe the method of data collection.
Data is collected by the Aviation Safety Network. Data is submitted when an accident is reported.
What type of study is this (observational/experiment)?
This is an observational study.
If you collected the data, state self-collected. If not, provide a citation/link.
Data is collected by Aviation Safety Network and is upload to a github account by Ritchie and Andrei Scheinkman. The data is available online and here is the link: https://github.com/fivethirtyeight/data/blob/master/airline-safety/airline-safety.csv
Andrei Scheinkman: The director of data and technology and a deputy editor at FiveThirtyEight Ritchie: Senior editor for data visualization at FiveThirtyEight. http://fivethirtyeight.com/
What is the response variable, and what type is it (numerical/categorical)?
Number of incidents for a airline from 2000 to 2014, it’s numerical
What is the explanatory variable, and what type is it (numerical/categorival)?
Number of incidents for a airline from 1985 to 1999, it’s numerical
Provide summary statistics relevant to your research question. For example, if you’re comparing means across groups provide means, SDs, sample sizes of each group. This step requires the use of R, hence a code chunk is provided below. Insert more code chunks as needed.
summary(data$fatal_accidents_85_99)## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 0.000 0.000 1.000 2.179 3.000 14.000summary(data$fatal_accidents_00_14)## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 0.0000 0.0000 0.0000 0.6607 1.0000 3.0000paste('sample size is ',dim(data)[1])## [1] "sample size is 56"