読者です 読者をやめる 読者になる 読者になる

INPUTしたらOUTPUT!

忘れっぽいんでメモっとく

Rでsparklineを書きたい

最近のExcelにはsparklineという機能があって下図のようにセルの中に折れ線グラフ等が描けたりする。

https://msdn.microsoft.com/dynimg/IC392502.jpg

これをRでやりたいと思ってたらパッケージが公開されていたので試してみた。


インストール

GitHub - htmlwidgets/sparkline: jQuery Sparkline HTML Widget for Rに記載されている通り。githubからのインストールなのでdevtoolsパッケージが必要。

library(devtools)
install_github('htmlwidgets/sparkline')


sparklineをプロット

airqualityデータセットで試して見る。以下は5月から9月の風速と気温の平均を計算する例。

library(htmlwidgets)
library(sparkline)
library(dplyr)
d <- airquality %>%
  group_by(Month) %>%
  summarise(wind = mean(Wind),
            temp = mean(Temp))


RMarkdownでinlineで埋め込むと以下のように表示される。

| item | Sparkline             | BarChart                           | BoxPlot   
|------|-----------------------|------------------------------------|---------- 
| Wind | `r sparkline(d$wind)` | `r sparkline(d$wind, type ='bar')` | `r sparkline(d$wind, type ='box')`
| Temp | `r sparkline(d$temp)` | `r sparkline(d$temp, type ='bar')` | `r sparkline(d$wind, type ='box')`

f:id:tak95:20160331092337p:plain



公開元に

The API is pretty simple

とあるように非常に簡単にsparklineを描くことができた。