エントリーの編集
エントリーの編集は全ユーザーに共通の機能です。
必ずガイドラインを一読の上ご利用ください。
エントリーの編集は全ユーザーに共通の機能です。
必ずガイドラインを一読の上ご利用ください。
注目コメント算出アルゴリズムの一部にLINEヤフー株式会社の「建設的コメント順位付けモデルAPI」を使用しています
applyとかtapplyとか遅い。Rcppで楽したい。けど苦労はしたくない。 そんなときKmiscパッケージのrcpp_t... applyとかtapplyとか遅い。Rcppで楽したい。けど苦労はしたくない。 そんなときKmiscパッケージのrcpp_tapply_generator関数が役に立ちます。 使い方は簡単。tapply関数のFUNをreturnとともに放り込むだけ。 install.packages("Kmisc") library(Kmisc) cppTapply <- rcpp_tapply_generator("return mean(x);") 速さを測ってみます。 install.packages("microbenchmark") library(microbenchmark) microbenchmark( tapply(iris$Sepal.Length, iris$Species, mean), cppTapply(iris$Sepal.Length, iris$Species), ir