<p><div><div><div><div data-width="100" data-show-faces="false" data-send="true" data-layout="button_count" data-height="21" data-href="http://www.r-bloggers.com/escalating-life-expectancy/"></div></div><div><a data-url="http://www.r-bloggers.com/escalating-life-expectancy/" data-counturl="http://www.r-bloggers.com/escalating-life-expectancy/" data-count="horizontal" data-text="Escalating Life Expectancy" class="twitter-share-button" data-via="rbloggers" href="https://twitter.com/share"></a></div><div></div></div><div></div></div>
<div>
(This article was first published on <strong><a href="http://www.exegetic.biz/blog/2016/07/escalating-life-expectancy/"> R – Exegetic Analytics</a></strong>, and kindly contributed to <a rel="nofollow" href="http://www.r-bloggers.com/">R-bloggers)</a> </div>
<p>I’ve added mortality data to the <a target="_blank" href="https://github.com/DataWookie/lifespan">lifespan</a> package. A result that immediately emerges from these data is that average life expectancy is steadily climbing.</p>
<p><img sizes="(max-width: 800px) 100vw, 800px" srcset="http://i1.wp.com/www.exegetic.biz/blog/wp-content/uploads/2016/07/death-average-age.png?resize=456%2C342 800w, http://www.exegetic.biz/blog/wp-content/uploads/2016/07/death-average-age-624x468.png 624w" alt="death-average-age" class="wp-image-3720" src="http://i1.wp.com/www.exegetic.biz/blog/wp-content/uploads/2016/07/death-average-age.png?resize=456%2C342" data-recalc-dims="1"></p>
<pre>
> library(lifespan)
> ggplot(deaths, aes(x = year, y = avgage)) +
+   geom_boxplot(aes(group = year, fill = sex)) +
+   facet_wrap(~ sex) +
+   labs(x = &quot;&quot;, y = &quot;Average Age at Death&quot;) +
+   theme_minimal() + theme(legend.title = element_blank())
</pre>
<p>The effect is more pronounced for men, rising from around 66.5 in 1994 to 70.0 in 2014. The corresponding values for women are 74.6 and 76.5 respectively. Good news for everyone.</p>
<p>When do most deaths occur? It would seem that the peak lies in Winter, specifically January. There is a broad trough during the Summer months. Fractionally more women die in Winter, whereas slightly more men die during Summer.</p>
<p><img sizes="(max-width: 800px) 100vw, 800px" srcset="http://i2.wp.com/www.exegetic.biz/blog/wp-content/uploads/2016/07/deaths-per-day.png?resize=456%2C342 800w, http://www.exegetic.biz/blog/wp-content/uploads/2016/07/deaths-per-day-624x468.png 624w" alt="deaths-per-day" class="wp-image-3723" src="http://i2.wp.com/www.exegetic.biz/blog/wp-content/uploads/2016/07/deaths-per-day.png?resize=456%2C342" data-recalc-dims="1"></p>
<p><div><div><div><div data-width="55" data-show-faces="false" data-send="true" data-layout="box_count" data-height="62" data-href="http://www.r-bloggers.com/escalating-life-expectancy/"></div></div><div><a data-url="http://www.r-bloggers.com/escalating-life-expectancy/" data-counturl="http://www.r-bloggers.com/escalating-life-expectancy/" data-count="vertical" data-text="Escalating Life Expectancy" class="twitter-share-button" data-via="rbloggers" href="https://twitter.com/share"></a></div><div></div></div><div></div></div>
<div>
<div>To <strong>leave a comment</strong> for the author, please follow the link and comment on their blog: <strong><a href="http://www.exegetic.biz/blog/2016/07/escalating-life-expectancy/"> R – Exegetic Analytics</a></strong>.</div>
<hr>
<a rel="nofollow" href="http://www.r-bloggers.com/">R-bloggers.com</a> offers <strong><a rel="nofollow" href="http://feedburner.google.com/fb/a/mailverify?uri=RBloggers">daily e-mail updates</a></strong> about <a title="The R Project for Statistical Computing" rel="nofollow" href="http://www.r-project.org/">R</a> news and <a title="R tutorials" rel="nofollow" href="http://www.r-bloggers.com/?s=tutorial">tutorials</a> on topics such as: <a title="Data science" rel="nofollow" href="http://www.r-bloggers.com/?s=data%20science">Data science</a>, <a title="Big Data" rel="nofollow" href="http://www.r-bloggers.com/?s=Big%20Data">Big Data, <a title="R jobs" rel="nofollow" href="http://www.r-users.com/">R jobs</a>, visualization (<a title="ggplot and ggplot2 tutorials" rel="nofollow" href="http://www.r-bloggers.com/?s=ggplot2">ggplot2</a>, <a title="Boxplots using lattice and ggplot2 tutorials" rel="nofollow" href="http://www.r-bloggers.com/?s=boxplot">Boxplots</a>, <a title="Maps and gis" rel="nofollow" href="http://www.r-bloggers.com/?s=map">maps</a>, <a title="Animation in R" rel="nofollow" href="http://www.r-bloggers.com/?s=animation">animation</a>), programming (<a title="RStudio IDE for R" rel="nofollow" href="http://www.r-bloggers.com/?s=RStudio">RStudio</a>, <a title="Sweave and literate programming" rel="nofollow" href="http://www.r-bloggers.com/?s=sweave">Sweave</a>, <a title="LaTeX in R" rel="nofollow" href="http://www.r-bloggers.com/?s=LaTeX">LaTeX</a>, <a title="SQL and databases" rel="nofollow" href="http://www.r-bloggers.com/?s=SQL">SQL</a>, <a title="Eclipse IDE for R" rel="nofollow" href="http://www.r-bloggers.com/?s=eclipse">Eclipse</a>, <a title="git and github, Version Control System" rel="nofollow" href="http://www.r-bloggers.com/?s=git">git</a>, <a title="Large data in R using Hadoop" rel="nofollow" href="http://www.r-bloggers.com/?s=hadoop">hadoop</a>, <a title="Web Scraping of google, facebook, yahoo, twitter and more using R" rel="nofollow" href="http://www.r-bloggers.com/?s=Web+Scraping">Web Scraping</a>) statistics (<a title="Regressions and ANOVA analysis tutorials" rel="nofollow" href="http://www.r-bloggers.com/?s=regression">regression</a>, <a title="principal component analysis tutorial" rel="nofollow" href="http://www.r-bloggers.com/?s=PCA">PCA</a>, <a title="Time series" rel="nofollow" href="http://www.r-bloggers.com/?s=time+series">time series</a>, <a title="finance trading" rel="nofollow" href="http://www.r-bloggers.com/?s=trading">trading</a>) and more...
<img height="1" alt="" width="1" src="http://feeds.feedburner.com/~r/RBloggers/~4/ksGXMuI0l0s"></a></div>