magrittrがいい感じ

dplyrパッケージとmagrittrの組み合わせはいい感じだ。

  • dplyrパッケージで出来るだけデータフレームの状態でデータを捌いておいて
  • magrittrパッケージの関数を使って、必要なところだけベクトル化して捌く

というイメージだな。
magrittrパッケージのマニュアルに載っているAliases群を噛ませるとより%>%をエンジョイできるぞとそういうことです。
Aliaseはこちらに書いてある。

例えば全く意味がないけど、以下のような"流れる"コードが書けるわけです。

library(dplyr)
library(magrittr)
iris %>% 
  mutate(Width=Sepal.Width+Petal.Width) %>%
  group_by(Species) %>%
  summarize(AverageWidth=mean(Width)) %>%
  use_series(AverageWidth) %>%
  divide_by(3) %>%
  max

更にこれに、以下に紹介されているpingsパッケージのpings関数

を噛ませると、祝福のファンファーレまでGET出来ると合って、病みつきである。

> library(pings)
> pings(iris %>% 
+   mutate(Width=Sepal.Width+Petal.Width) %>%
+   group_by(Species) %>%
+   summarize(AverageWidth=mean(Width)) %>%
+   use_series(AverageWidth) %>%
+   divide_by(3) %>%
+   max)


!!!!! 6 Hits Combo !!!!!
!!!!! Excellent !!!!!