| --- | |
| title : Aussie jerbs | |
| subtitle : Playing around with R, Rmarkdown & Slidify | |
| author : Tim Cameron | |
| job : | |
| framework : io2012 # {io2012, html5slides, shower, dzslides, ...} | |
| highlighter : highlight.js # {highlight.js, prettify, highlight} | |
| hitheme : tomorrow # | |
| widgets : [] # {mathjax, quiz, bootstrap} | |
| mode : selfcontained # {standalone, draft} |
| --- | |
| title : Aussie jerbs | |
| subtitle : Playing around with R, Rmarkdown & Slidify | |
| author : Tim Cameron | |
| job : | |
| framework : io2012 # {io2012, html5slides, shower, dzslides, ...} | |
| highlighter : highlight.js # {highlight.js, prettify, highlight} | |
| hitheme : tomorrow # | |
| widgets : [] # {mathjax, quiz, bootstrap} | |
| mode : selfcontained # {standalone, draft} |
| Aussie jobs | |
| Messing around with R, knitr & Markdown | |
| ======================================================== | |
| author: Tim Cameron | |
| transition: rotate | |
| incremental: true | |
| code at - http://cpsievert.github.io/slides/markdown | |
| All the cool kids use it... |
| Aussie jobs | |
| Messing around with R, knitr & Markdown | |
| ======================================================== | |
| author: Tim Cameron | |
| transition: rotate | |
| incremental: true | |
| code at - http://cpsievert.github.io/slides/markdown | |
| All the cool kids use it... |
| <!doctype HTML> | |
| <meta charset = 'utf-8'> | |
| <html> | |
| <head> | |
| <link rel='stylesheet' href='http://nvd3.org/src/nv.d3.css'> | |
| <script src='http://ajax.googleapis.com/ajax/libs/jquery/1.8.2/jquery.min.js' type='text/javascript'></script> | |
| <script src='http://d3js.org/d3.v3.min.js' type='text/javascript'></script> | |
| <script src='http://timelyportfolio.github.io/rCharts_nvd3_tests/libraries/widgets/nvd3/js/nv.d3.min-new.js' type='text/javascript'></script> | |
| <script src='http://nvd3.org/lib/fisheye.js' type='text/javascript'></script> |
| <!doctype HTML> | |
| <meta charset = 'utf-8'> | |
| <html> | |
| <head> | |
| <link rel='stylesheet' href='http://nvd3.org/src/nv.d3.css'> | |
| <script src='http://ajax.googleapis.com/ajax/libs/jquery/1.8.2/jquery.min.js' type='text/javascript'></script> | |
| <script src='http://d3js.org/d3.v3.min.js' type='text/javascript'></script> | |
| <script src='http://timelyportfolio.github.io/rCharts_nvd3_tests/libraries/widgets/nvd3/js/nv.d3.min-new.js' type='text/javascript'></script> | |
| <script src='http://nvd3.org/lib/fisheye.js' type='text/javascript'></script> |
| <!doctype HTML> | |
| <meta charset = 'utf-8'> | |
| <html> | |
| <head> | |
| <link rel='stylesheet' href='http://nvd3.org/src/nv.d3.css'> | |
| <script src='http://ajax.googleapis.com/ajax/libs/jquery/1.8.2/jquery.min.js' type='text/javascript'></script> | |
| <script src='http://d3js.org/d3.v3.min.js' type='text/javascript'></script> | |
| <script src='http://timelyportfolio.github.io/rCharts_nvd3_tests/libraries/widgets/nvd3/js/nv.d3.min-new.js' type='text/javascript'></script> | |
| <script src='http://nvd3.org/lib/fisheye.js' type='text/javascript'></script> |
| library(devtools) | |
| library(reshape2) | |
| #install_github('rCharts', 'ramnathv', ref = 'dev') | |
| library(rCharts) | |
| data <- read.csv("~/industry.csv") | |
| fd <- as.data.frame(diff(as.matrix(data[,c(2:ncol(data))]),1)) | |
| fd$date <- data[-1,1] | |
| fd <- melt(fd, .id = date) |
I don't love the 'annualised' quarterly growth rates shown in this chart, it is more for demonstrative purposes.
You can select the cities you want displayed by clicking on the corresponding coloured dots. The 'stacked' option is of no use in this example (I will learn how to turn it off for future charts).
Thanks to Ramnath Vaidyanathan for his rapid reponses to questions about rCharts - http://rcharts.io/