[This article was first published on Graph of the Week, and kindly contributed to R-bloggers]. (You can report issue about the content on this page here)
Want to share your content on R-bloggers? click here if you have a blog, or here if you don't.
Want to share your content on R-bloggers? click here if you have a blog, or here if you don't.
 |
| Data represents all planes (not just commercial planes) for the United States |
— Orson Welles, interview to celebrate his 70th birthday, The Times of London, 6 May 1985.
For some people, flying represents their worst fears. Not only are you helpless if something goes awry, but you will most likely have some time to ponder it before the end arrives.
Terror
Takeoff can be the worst as you feel the chassis shudder and moan with the strain. This is the time when many accidents occur, due to the forces involved getting a massively heavy object off the ground. That being said, there aren’t enough o’s in smooth to describe the sensation once you arrive at altitude. Unless, of course, you hit turbulence…
Boredom
During the main leg of the flight, Orson Welles was correct about boredom – before all of the entertainment options sprung up on airplanes. In his time, imagine flying across country in a smoke-filled airplane with nothing to do except immerse yourself in a book. These days most passengers play games, watch movies or listen to music to keep themselves occupied. Of course, there is always the option of actually talking to your neighbor.
Terror
Inevitably, the plane must land and the fear factor usually rises again. Crosswinds, runway conditions and pilot skill all play a role in landing. Looking out the window and seeing the wing rise and fall as the airplane rotates to counter various atmospheric effects can certainly make one nervous. Depending on the above factors, sometimes you are greeted with a jolting sensation as the plane touches (sometimes bounces) down.
Accidents are Fewer and Less Catastrophic
Looking at the above chart (which shows all accidents for all types of planes), two main trends emerge:
- The number of accidents is decreasing as a trend. Since 1982, this number has basically been cut in half.
- The percentage of planes being destroyed from an accident has fallen dramatically.
It is refreshing to see that aviation safety is looking up. One reason might be from advancements such as the Traffic Collision Avoidance System, which is designed to reduce mid-air collisions. As the TCAS and other systems evolve, accidents should continue to trend downward in the years to come.
Other reasons might include the composition of the planes themselves, procedural changes, better pilot training methods or perhaps aircraft design. Come back and visit this site again for further exploration of this topic.
Conclusion
If the news reported the number of safe flights on a daily basis, the papers would be overflowing with that one theme. Unfortunately, that aspect isn’t news; what is news is when an airplane crashes. When that happens, we have no reference point to remind ourselves that we have a 1 in 2 million chance of being involved in an aviation accident and have at least a 60% chance of surviving it. If one were to think that news is reality, then nobody would fly. News generally only represents something way out of the ordinary – a statistical outlier. While nothing is guaranteed in this world, flying is still a pretty safe bet.
Questions:
1) What advancements have been made in aircraft technology?
2) What other flight management systems are being considered to improve flight safety?
3) Will newspapers ever put stories in context?
Data:
Code:
These graphs were generated using the ‘ggplot2‘ package within the R programming language:
1st graph:
graph.cols <- c("dark red","red","pink","grey")
ggplot(subset(accidents.prior.frame, Country == 'United States'), aes(x=Accident.Date,fill=factor(Aircraft.Damage))) +
geom_histogram(binwidth=365.2) +
ylab("Number of Accidents") +
xlab("Year") +
opts(title="Yearly Aviation Accidents",
legend.title = theme_blank(),
panel.background = theme_blank(),
axis.text.x = theme_text(angle=60)) +
scale_fill_manual(values = graph.cols)
Further Reading (the following all have at least 3 stars or are unrated):
To leave a comment for the author, please follow the link and comment on their blog: Graph of the Week.
R-bloggers.com offers daily e-mail updates about R news and tutorials about learning R and many other topics. Click here if you're looking to post or find an R/data-science job.
Want to share your content on R-bloggers? click here if you have a blog, or here if you don't.