Try Slidify

Step 0: Install Slidify

library(devtools)
install_github('slidify', 'ramnathv')
install_github('slidifyLibraries', 'ramnathv')

Step 1: Author Deck

author("mydeck")

Step 2: Edit Deck

index.Rmd を頑張って編集！！

Step 3: Generate Deck

slidify("index.Rmd")

Step 4: Publish Deck

Github

publish(user = "USER", repo = "REPO", host = 'github')

Dropbox

publish('mydeck', host = 'dropbox')

正規分布

平均を \(\mu\) 、分散を \(\sigma\) とすると、下記の確率密度関数で表せる。

\[ f(x) = \frac{1}{\sqrt{2 \pi \sigma^2}} \rm{exp} \left( - \frac{(x - \mu)^2}{2 \sigma^2} \right) \]

library(ggplot2)
qplot(hp, mpg, data = mtcars) + geom_smooth()

library(rCharts)
x <- subset(as.data.frame(HairEyeColor), Sex=="Male")
nPlot(Freq~Hair, group="Eye", data=x, type="multiBarChart")