廿TT

譬如水怙牛過窓櫺 頭角四蹄都過了 因甚麼尾巴過不得

ggplot2 で移動平均(stat_ma)

Extending ggplot2Extending ggplot2(和訳) - Qiita)を読んで自分でも新しい stat を作ってみたくなったので、手始めに練習として移動平均を描画する関数 stat_ma を書いてみました。

stat_ma.R · GitHub

library(ggplot2)
source("https://gist.githubusercontent.com/abikoushi/c798780f7a6ecd24ee12a0fa1aebc698/raw/558b25aa6ced5566b8ffba8b2684101eeed4e576/stat_ma.R")
ggplot(economics, aes(date, unemploy)) + 
  geom_point(alpha=0.5)+
  stat_ma(colour="salmon",size=1,windowsize = 30)

f:id:abrahamcow:20170602023610p:plain

ggplot の中でやらないで、ふつうに移動平均出してからプロットしても同じ結果が得られるんだけど windowsize を探索的にいろいろ変えられるのでいいかなあと思った。

ゆくゆくは {googleAnalyticsR} {ggplot2} 内訳をドリルダウンしていく棒グラフ - 廿TT なんかを geom 化したい。しました → ggplot2 で内訳を左から右に詳細化していく棒グラフ - 廿TT

ggplot2 で二項分布の成功確率パラメータの信頼区間 - 廿TT も書いた。

アマゾンアフィリエイトのコーナー

Rグラフィックスクックブック ―ggplot2によるグラフ作成のレシピ集

Rグラフィックスクックブック ―ggplot2によるグラフ作成のレシピ集