高校数学の質問スレ（医者・東大卒専用） Part438 (979ﾚｽ)

高校数学の質問スレ（医者・東大卒専用） Part438 http://rio2016.5ch.net/test/read.cgi/math/1723152147/

上下前次1-新
通常表示 512ﾊﾞｲﾄ分割 ﾚｽ栞
抽出解除 必死ﾁｪｯｶｰ(本家) (べ) 自ID ﾚｽ栞 あぼーん

---

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

---

479: １３２人目の素数さん [sage] 2024/12/29(日) 07:54:27.11 ID:/ygSVCno rm(list=ls()) library(RcppAlgos) pm12=permuteGeneral(0:1,12,repetition = TRUE) colnames(pm12)=LETTERS[1:12] f12=\(x){ A=x[1];B=x[2];C=x[3];D=x[4] E=x[5];F=x[6];G=x[7];H=x[8] I=x[9];J=x[10];K=x[11];L=x[12] all( (A==1 & A==1) | (A==0 & A==0), # A 「私は正直者である」 (B==1 & A==0) | (B==1 & A==1), # B 「Aは嘘つきである」 (C==1 & B==0) | (C==1 & B==1), # C 「Bは嘘つきである」 (D==1 & C==0) | (D==1 & C==1), # D 「Cは嘘つきである」 (E==1 & A==1) | E==0, # E 「Aは正直者である」 (F==1 & B==1) | F==0, # F 「Bは正直者である」 (G==1 & C==1) | G==0, # G 「Cは正直者である」 (H==1 & D==1) | H==0, # H 「Dは正直者である」 I==1 | (I==0 & E==1), # I 「Eは嘘つきである」 J==1 | (J==0 & F==1), # J 「Fは嘘つきである」 K==1 | (K==0 & G==1), # K 「Gは嘘つきである」 L==1 | (L==0 & H==1)) # L 「Hは嘘つきである」 } re=pm12[apply(pm12,1,f12),] colnames(re)[colSums(re)==nrow(re)] http://rio2016.5ch.net/test/read.cgi/math/1723152147/479

---

ﾒﾓ帳

(0/65535文字)

---

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

---

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

---

Google検索

Wikipedia

---

ぬこの手 ぬこTOP 0.025s