• 更快得到答案
• 加深印象
• 發現被忽略的資訊

[1] "TWII"

這樣鬼才看得懂...

因為...

• 我想迅速把圖畫好
• 各種強大的套件
• 可以和各種平台結合
• 容易做資料分析
• 資料量過大

靜態

• graphics
• ggplot2

動態

• googleVis
• rCharts

製作網頁

• shiny

假設今天有個阿宅想要辦聯誼...

在網路上看到...

接下來，聯誼什麼的，就不干R的事囉~~~

還是乖乖畫圖吧~~~

優點

• 簡單
• 可快速觀察資料
• 自由度大，易調整版面

缺點

• 預設值較簡陋
• 要改到超好看，需要很多參數和美術天份

• R Graphics
• 常用的R繪圖程式
• http://www.cookbook-r.com/Graphs/

起手式

• data.frame
• ggplot(data,aes(x=...,y=...))+geom_XXX()

優點

• 預設值佳、有質感

缺點

• 需花點心思學習
• 版面調整需要一些技巧

• http://www.cookbook-r.com/Graphs/
• Handout of ggplot2
• 指令集：http://docs.ggplot2.org/current/

• R & Google Charts API
• Visualize data with Google Chart Tools without manually upload data to Google.
• data.frame

優點

• 互動式呈現
• 簡單
• 預設值就很讚

缺點

• 需要網路
• 需要稍微懂一點JaveScript，才比較好調整參數

• http://decastillo1.github.io/googleVis_Tutorial/
• http://code.google.com/p/google-motion-charts-with-r/

• R與JavaScript的結合
• 有一堆JavaScript的library：highcharts、Morris、NVD3、Polycharts、Rickshaw、xcharts、Leaflet(for map)...

install.package("devtools")
library(devtools)
install_github('rCharts', 'ramnathv')

優點

• 互動式呈現
• 好看、新奇、又好玩
• 方便上傳github和rPubs

缺點

• 太多library，畫法沒整合
• 開發中
• 部分語法需要網路

• ~/R/library/rCharts/libraries: 各種範例
• http://ramnathv.github.io/rCharts/
• http://rcharts.io/gallery/
• Ramnath's Github
• http://www.analyticsandvisualization.com/p/blog-page_7.html

• 以R做網頁的工具
• 幾乎只要會R就行
• 互動式呈現資料
• 支援各式繪圖工具：graphics、ggplot2、googleVis和rCharts

• shiny官方教學
• shiny官方範例
• 內建的example
• 程式人雜誌
• Taiwan R User group shiny教學

install.packages("shiny")
library(shiny)
runExample()

## Valid examples are "01_hello", "02_text", "03_reactivity", "04_mpg",
## "05_sliders", "06_tabsets", "07_widgets", "08_html", "09_upload",
## "10_download", "11_timer"

runExample("01_hello")

不想只在local端執行shiny的話...

• 至shiny的網站申請免費帳號 http://www.rstudio.com/shiny/server/

回到之前的例子

graphics

barplot(target1, beside=TRUE, legend=colnames(target1))

ggplot2

ggplot(aes(x=disp, y=number, fill=sex), data=target2)+
geom_bar(stat="identity", position="dodge")

googleVis

bar <- gvisColumnChart(target, xvar="disp", yvar=c("male","female"))
plot(bar)

rCharts

hPlot(number ~ disp, group = "sex", data = target2, type = "column")

偶爾也要關心一下台灣...

最近有個新聞

過年去台東玩吧~~

救救老殘窮...

出去玩之前，要衡量一下自己的錢包...

• Meetup
• facebook