高校数学の質問スレ（医者・東大卒専用） Part438 (991ﾚｽ)
上下前次1-新
抽出解除 ﾚｽ栞
74: 2024/08/17(土)14:48:01.69 ID:mowI5mD2(3/4) AAS
(*
10人のうち血液型A,O,B,ABの人がそれぞれ4,3,2,1人いる。
この中から無作為に n 人を選んだとき血液型がすべて異なる確率を求めるソルバーを作れ。
*)
solve[n_] :=(
b= {1, 2, 2, 3, 3, 3, 4, 4, 4, 4};
c = Subsets[b,{n}];
Total@Boole[Length@Union@# ==Min[n,4] & /@ c]/Length@c
)
Table[solve[n],{n,1,10}]
316: 2024/11/18(月)04:58:31.69 ID:GrxPVQzd(1) AAS
数直線上に動点Pがあり、
時刻0には原点に居て、速度が位置の関数としてv(x)= (x-α)(x-β） で与えられているときの
時刻tでのPの位置を求めよ。
α=βのとき
x[t]= tα^2/(1+tα)
α≠βのとき
1/ (x-α)(x-β）= 1/(α-β)[1/(x-α) - 1/(x-β)]を使って
x[t]=[e^(αt)-e^(βt)]/[αe^(αt)-βe^(βt)]
414: 2024/12/11(水)09:02:45.69 ID:qk9aTmTZ(2/6) AAS
"
注射液8本のうち2本が致死的な毒薬である場合
ネズミ1: 注射液1, 2, 3, 4
ネズミ2: 注射液1, 2, 5, 6
ネズミ3: 注射液1, 3, 5, 7
に記載された投与法で実験したら全部のネズミが死亡してしまった。
可能な２つの毒薬の組み合わせをすべて列挙せよ。
"
rm(list=ls())
mat=matrix(
c(1, 2, 3, 4,
1, 2, 5, 6,
1, 3, 5, 7),nrow=3,by=TRUE)
mat
cm=t(combn(8,2)) ; cm
lost_rats=\(y) (apply(mat,1, \(x) y[1] %in% x) | apply(mat,1, \(x) y[2] %in% x)) |> which() |> sum()
lost=apply(cm,1,lost_rats)
re=cbind(cm,lost)
tmp1=re[re[,3]==6,1:2] ; tmp1
tmp2=cbind(1:7,8)
rbind(tmp1,tmp2) |> unique()
753: 03/12(水)21:31:17.69 ID:pDKAHj/P(1) AAS
「鹿児島 私立中学 寮 事件」や「学校名 寮 いじめ」で画像検索したらどこかわかるけど、絶対に探すなよ
i.imgur.com/s0F0tJb.jpeg i.imgur.com/4nmblMW.png
ソース 鹿児島放送 動画 外部ﾘﾝｸ:www.tiktok.com
【鹿児島】私立中男子が入浴中に寮で大けが…「加害生徒の処分を」被害生徒の父が会見、いじめ重大事態に認定した学校へ調査と適切な対応求める
鹿児島県内の私立中学校の寮で、入浴していた１年生の男子生徒が、同学年の複数の男子生徒に両足首を引っ張られて転倒し、右手にまひが残るけがを負っていたことが７日、分かった。
学校はいじめ防止対策推進法に基づく重大事態に認定。今後、第三者委員会を設置して調査を進める。
被害生徒の保護者や学校によると、発生は２０２４年６月２５日。寮の共同浴場で、一緒に入浴していた男子生徒に両足首を引っ張り上げられた。転倒した際、湯を張った浴槽の床に後頭部と首を強く打ち付けた。
７月上旬、別の男子生徒に拳で肩をたたかれて痛みが強くなったため、１０日に養護教諭に相談し発覚。同日に病院を受診し、頸髄不全損傷（全治約１カ月）と診断された。
保護者は８月中旬、県警に被害届を提出し、受理されている。
９月末、いじめ認定を求める申立書が被害生徒の保護者から出され、対応を再協議。１０月３日に重大事態に認定した。第三者委員会の設置時期は未定。
教頭は「重く受け止めている。症状が早く改善し、普段通り学校生活を送れるように対応する」としている。
この問題を受け、４０代の父親が２１日、鹿児島市の県庁で会見を開いた。「学校は、加害生徒への処分を検討してほしい」と訴えた。父親は「大けがなのに相応の処分がないのは納得できない。しっかりと調査して、適切に対応してほしい」と求めた。
南日本新聞
373news.com/_news/storyid/202380/
373news.com/_news/storyid/203141/
796: 04/24(木)11:56:46.69 ID:qcnhUa6a(1) AAS
solve = \(m, N=100, n=10, r=4){
library(gmp)
Akadama = \(R) {
valid = (R >= r) & ((N - R) >= (n - r))
result = rep(as.bigz(0), length(R))
result[valid] = chooseZ(R[valid], r) * chooseZ(N - R[valid], n - r)
result / chooseZ(N, n)
}
numerator = Akadama(m)
candidates = 0:N
denominator = sum(Akadama(candidates))
numerator / denominator
}
solve(50:100) |> sum()
上下前次1-新書関写板覧索設栞歴
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ
ぬこの手 ぬこTOP 0.054s