高校数学の質問スレ（医者・東大卒専用） Part438 (752ﾚｽ)
上下前次1-新

---

420: 2024/12/11(水)19:03 ID:qk9aTmTZ(6/6) AA×


[240|320|480|600|100%|GIF|べ|ﾚｽ栞|ﾚｽ消]
420: [sage] 2024/12/11(水) 19:03:34.34 ID:qk9aTmTZ ネズミと試薬の組み合わせ行列から単射になるかを判定する関数はできたが 総当たりするには数が多すぎる。 " 行：ネズミ　列：混合試薬　から　単射　か否かを判定する。 試薬数が不揃いなときはNAを入れる [,1] [,2] [,3] [,4] [1,] 1 2 3 8 [2,] 2 4 5 6 [3,] 1 2 4 5 [4,] 1 3 4 6 [5,] 4 6 7 NA [6,] 1 2 5 NA " rm(list=ls()) rats <- function(num, N=2, digit = 6){ r=num%%N q=num%/%N while(q > 0 | digit > 1){ r=append(q%%N,r) q=q%/%N digit=digit-1 } which(r==1) } cm=t(combn(8,2)) calc82=\(mat,verbose=FALSE){ lost=\(y){ m=nrow(mat) tmp1=(apply(mat,1, \(x) y[1] %in% x) | apply(mat,1, \(x) y[2] %in% x)) tmp2=as.integer(tmp1) tmp2 %*% c(2^(0:(m-1)))|> as.vector() -> tmp3 tmp3 } i=apply(cm,1,lost) re=sapply(1:max(i),\(x) cm[i==x,]) if(verbose) print(re) all(unlist(lapply(re,length))<=2) } mat=t(replicate(6,sort(sample(8,4)))) ; mat calc82(mat,TRUE) http://rio2016.5ch.net/test/read.cgi/math/1723152147/420
ネズミと試薬の組み合わせ行列から単射になるかを判定する関数はできたが 総当たりするには数が多すぎる 行ネズミ 列混合試薬 から 単射 か否かを判定する 試薬数が不揃いなときはを入れる

---

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

---

あと 332 ﾚｽあります
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ

---

ぬこの手 ぬこTOP 0.033s