統計解析R たぶんpart3くらい (587ﾚｽ)
上下前次1-新
抽出解除 ﾚｽ栞

---

ﾘﾛｰﾄﾞ規制です｡10分ほどで解除するので､他のﾌﾞﾗｳｻﾞへ避難してください｡

---

22(1): 2012/06/27(水)10:48:52.12 AAS
これってマスマティカみたいな使い方できるの？

---

105(1): 2015/06/22(月)12:27:26.12 ID:uueAlGhq(1) AAS
>>104
ちょっとまて。
0で正解だろ。
Rの処理が失敗すれば1に、成功すれば0だから、それで正しいだろ。
何がしたいんだ。

------- ここから -----
#!/bin/bash

cat <<EOF > test.R
nantoka <- 123
hoge
EOF

R --vanilla --slave < test.R
echo $?
------- ここまで ------

これならちゃんと期待通り1が返るけど。

---

274: 2019/05/25(土)23:01:34.12 ID:WHAQulv7(1) AAS
＞＞２６８
ま、Rubyで統計解析しなくてもいいんじゃね？
今のところ、信頼性保証できないでしょ

---

286: 2019/07/06(土)00:12:22.12 ID:EHwJE8LY(2/4) AAS
``` {r}
big_data = list ( `%>%` = purrr::`%>%` , add = rlist::list.append , size = length , null = NULL , true = T , false = F , na = NA);

big_data = with (c (big_data, get = lenses::view, set = lenses::set, why = T), {
plain = function (M) {
if (why) { # avoid lazy evaluation
if (is.matrix (M) != true | nrow (M) != ncol (M)) {
stop ('parameter must be an invertible matrix.');
}
}
lenses::lens (
view = function (state) {
as.vector (M %*% state);
}, set = function (state, value) {
as.vector (solve (M, value));
}
);
};
value_l = lenses::index ('value');
make_state = function (value) {
list (hello = 'world') %>% set (value_l, value);
};
make_lens = function (M) {
lenses::`%.%` (value_l, plain (M));
};
add (big_data, make_state = make_state, make_lens = make_lens, get = get, set = set);
});
```

---

289: 2019/07/22(月)01:06:05.12 ID:mXxEN3aK(1) AAS
[イーガン予想](外部ﾘﾝｸ:golem.ph.utexas.edu
[嘘だけど](外部ﾘﾝｸ:en.wikipedia.org

小説の上手い数学の研究者もいれば
哲学の上手いPandocの開発者もいる
いろいろな人がいる

---

上下前次1-新書関写板覧索設栞歴

---

ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ

---

ぬこの手 ぬこTOP 0.029s