【R言語】統計解析フリーソフトR 第4章【GNU R】at MATH【R言語】統計解析フリーソフトR 第4章【GNU R】 - 暇つぶし2ch■コピペモード□スレを通常表示□オプションモード□このスレッドのURL■項目テキスト405:132人目の素数さん 12/02/17 20:15:30.11 >>404 >>401じゃなくて申し訳ないが、 > length(Filter(predicate, data)) [1] 4 > sum(data<5) [1] 4 この場合だと下の方が簡単。しかも、 > system.time(sapply(1:1000, function(x){length(Filter(predicate, data))})) ユーザ システム 経過 0.072 0.000 0.074 > system.time(sapply(1:1000, function(x){sum(data<5)})) ユーザ システム 経過 0.000 0.000 0.002 圧倒的に速い。 406:405 12/02/17 20:17:05.57 s/下の方が/後者の方が/ 407:132人目の素数さん 12/02/17 22:46:29.44 >>404 「おぉ高階関数はこれほどまでに便利なものかと実感できる事例」を期待している。 408:132人目の素数さん 12/02/18 05:48:26.33 rubyで高階関数組み合わせてやってたけど Rに移ってtapplyとかmapplyが便利すぎて禿げた 409:132人目の素数さん 12/02/18 06:05:41.05 >>404 Filter()の例は length(data[data < 5]) みたいなもんか 次ページ最新レス表示レスジャンプ類似スレ一覧スレッドの検索話題のニュースおまかせリストオプションしおりを挟むスレッドに書込スレッドの一覧暇つぶし2ch