- この記事は、CyberAgent エンジニア Advent Calendar 2014の21日目の記事です。
- 20日目は@kakerukaeruさんのエンジニアの僕が三軒茶屋で写真を存分に使ってmcrouterでした。
- 22日目は@ogaclejapanさんです。
21日目は、秋葉原ラボの@k66dangoが担当します。
21日目は、秋葉原ラボの@k66dangoが担当します。
21日目は,秋葉原ラボの@k66dangoが担当します.
summary_se = function(data, measurevar, idvar, betweenvars) { | |
require('dplyr') | |
require('lazyeval') | |
summarized = data %>% | |
group_by_(.dots=c(idvar, betweenvars)) %>% | |
dplyr::summarise_(.dots = list( | |
MeasureVar = interp( ~mean( MEASUREVAR, na.rm=TRUE), MEASUREVAR = as.name(measurevar) ) | |
)) %>% | |
ungroup() %>% |