統計解析R たぶんpart3くらい (587レス)
統計解析R たぶんpart3くらい http://mevius.5ch.net/test/read.cgi/tech/1340339592/
上
下
前次
1-
新
通常表示
512バイト分割
レス栞
抽出解除
必死チェッカー(本家)
(べ)
自ID
レス栞
あぼーん
リロード規制
です。10分ほどで解除するので、
他のブラウザ
へ避難してください。
388: デフォルトの名無しさん [] 2021/06/12(土) 07:55:41.53 ID:eU1Xef15 わかっていないところなので最初に結論: * 混ぜるな危険 * 触らぬ神に祟りなし [NSE](http://adv-r.had.co.nz/Computing-on-the-language.html)を使った関数と [高階関数](https://en.wikipedia.org/wiki/Higher-order_function)を混ぜるな。 殆どの人にとって、何行でプログラムが書けるかは問題でなく、何分で結果が 得られるかが問題だと思う。見つけにくいバグを生みやすいテクは避けた方が 無難だと思う。 複数の表に対して同じ操作をするオモチャを考える。 ``` {r sub, dependson = ""} sub = with (new.env (), { r_swap = \(abc) \(b, a) abc (a, b); try_it = \(expr) tryCatch (expr, error = gettext); as.list (rlang::current_env ()); }); ``` つづく http://mevius.5ch.net/test/read.cgi/tech/1340339592/388
389: デフォルトの名無しさん [] 2021/06/12(土) 07:57:10.18 ID:eU1Xef15 ``` {r map, dependson = "sub"} sub = with (sub, { `%map%` = purrr::map; f = \(abc) \(...) \(a) abc (a, ...); g = \(abc) \(b) \(a) abc (a, b); datum = list (head (cars), tail (cars)); datum %map% f (`[`) (2 : 1) |> try_it () |> print (); datum %map% g (`[`) (2 : 1) |> try_it () |> print (); datum %map% f (r_swap (lm)) (dist ~ speed) |> try_it () |> print (); datum %map% g (r_swap (lm)) (dist ~ speed) |> try_it () |> print (); datum %map% f (subset) (dist == max (dist)) |> try_it () |> print (); datum %map% g (subset) (dist == max (dist)) |> try_it () |> print (); datum %map% f (dplyr::group_by) (dist) |> try_it () |> print (); datum %map% g (dplyr::group_by) (dist) |> try_it () |> print (); datum %map% f (dplyr::mutate) (b = dist + 1) |> try_it () |> print (); datum %map% g (dplyr::mutate) (b = dist + 1) |> try_it () |> print (); as.list (rlang::current_env ()); }); ``` * `f (group_by) (dist)`と`g (group_by) (dist)`の違いは? * `lm`と他のNSEとの違いは? 個人的には、これらの疑問を明朗会計できない。 おしまい http://mevius.5ch.net/test/read.cgi/tech/1340339592/389
メモ帳
(0/65535文字)
上
下
前次
1-
新
書
関
写
板
覧
索
設
栞
歴
スレ情報
赤レス抽出
画像レス抽出
歴の未読スレ
AAサムネイル
Google検索
Wikipedia
ぬこの手
ぬこTOP
0.026s