【質問者必読!!】
まず>>1-5をよく読んでね
数学@5ch掲示板用 掲示板での数学記号の書き方例と一般的な記号の使用例
http://mathmathmath.dotera.net/
・まずは教科書、参考書、web検索などで調べるようにしましょう。(特に基本的な公式など)
・問題の写し間違いには気をつけましょう。
・長い分母分子を含む分数はきちんと括弧でくくりましょう。
(× x+1/x+2 ; ○((x+1)/(x+2)) )
・丸文字、顔文字、その他は環境やブラウザによりうまく表示できない場合があります。
どうしても画像を貼る場合はPCから直接見られるところに見やすい画像を貼ってください。
ピクトはPCから見られないことがあるので避けてください。
・質問者は名前を騙られたくない場合、トリップを付けましょう。
(トリップの付け方は 名前(N)に 俺!#oretrip ←適当なトリ)
・質問者は回答者がわかるように問題を書くようにしましょう。
でないと放置されることがあります。
(変に省略するより全文書いた方がいい、また説明なく習慣的でない記号を使わないように)
・質問者は何が分からないのか、どこまで考えたのかを明記しましょう。
それがない場合、放置されることがあります。
(特に、自分でやってみたのに合わないので教えてほしい、みたいなときは必ず書くように)
・回答者も節度ある回答を心がけてください。
・出題スレではありません。出題は該当スレにお願いします。
・970くらいになったら次スレを立ててください。
※前スレ
高校数学の質問スレ Part436
https://rio2016.5ch.net/test/read.cgi/math/1718662026/
高校数学の質問スレ Part437
■ このスレッドは過去ログ倉庫に格納されています
2024/07/16(火) 04:16:47.48ID:STV46lUb
140132人目の素数さん
2024/07/21(日) 06:14:01.68ID:gqxoTIMX >>139
出題と質問の違いが分からないチンパン発見
出題と質問の違いが分からないチンパン発見
141132人目の素数さん
2024/07/21(日) 06:16:41.30ID:iGZdMXnd 厳密解が出せないので質問します。
血液型頻度比はA:O:B:AB=4:3:2:1とする。
献血で一人ずつ採血していきすべての血液型が複数集まったら終了する。
終了するまでに採血された人数の期待値を求めよ。
血液型頻度比はA:O:B:AB=4:3:2:1とする。
献血で一人ずつ採血していきすべての血液型が複数集まったら終了する。
終了するまでに採血された人数の期待値を求めよ。
142132人目の素数さん
2024/07/21(日) 06:17:11.59ID:iGZdMXnd >>134
Wolfram言語使えるように学習すればいいのに。
俺は4月に登録すればWolfram言語は無料で使えることを教わって
数値計算もシミュレーションもR言語並にできるようになった。
作図や動画はRが頼り。
Wolfram言語使えるように学習すればいいのに。
俺は4月に登録すればWolfram言語は無料で使えることを教わって
数値計算もシミュレーションもR言語並にできるようになった。
作図や動画はRが頼り。
143132人目の素数さん
2024/07/21(日) 06:18:40.75ID:gqxoTIMX そもそも尿瓶ジジイID:iGZdMXndが垂れ流してるのはそもそも高校数学じゃなくてチンパン数学()だし出題と質問の違いも分からないし話にならんねw
チンパン数学()にレスしてるのもどうせ自演だろうが百歩譲って別人でも尿瓶と同レベルのアホ
チンパン数学()にレスしてるのもどうせ自演だろうが百歩譲って別人でも尿瓶と同レベルのアホ
144132人目の素数さん
2024/07/21(日) 06:19:46.63ID:gqxoTIMX >>142
wolfram言語以前の問題だろそもそもアンタ日本語通じてないアホなんだからww
wolfram言語以前の問題だろそもそもアンタ日本語通じてないアホなんだからww
145132人目の素数さん
2024/07/21(日) 07:00:33.13ID:iGZdMXnd >>139
100万回乱数発生させてシミュレーションしてみた。
Wolfram Language 14.0.0 Engine for Microsoft Windows (64-bit)
Copyright 1988-2023 Wolfram Research, Inc.
In[1]:= p={4/10,3/10,2/10,1/10};
In[2]:= sim[]:=(
For[li=RandomChoice[p->Range[4],8];cl=Counts@li;count=8,
Length[cl]<4 || AnyTrue[cl,#<2&],count++, AppendTo[li,RandomChoice[p->Range[4],1]];li=Flatten@li;cl=Counts@li];
count
)
In[3]:= N@Mean@Table[sim[],10^6]
Out[3]= 22.3857
100万回乱数発生させてシミュレーションしてみた。
Wolfram Language 14.0.0 Engine for Microsoft Windows (64-bit)
Copyright 1988-2023 Wolfram Research, Inc.
In[1]:= p={4/10,3/10,2/10,1/10};
In[2]:= sim[]:=(
For[li=RandomChoice[p->Range[4],8];cl=Counts@li;count=8,
Length[cl]<4 || AnyTrue[cl,#<2&],count++, AppendTo[li,RandomChoice[p->Range[4],1]];li=Flatten@li;cl=Counts@li];
count
)
In[3]:= N@Mean@Table[sim[],10^6]
Out[3]= 22.3857
146132人目の素数さん
2024/07/21(日) 08:07:56.29ID:yNeLjgJ4 >>145
結局何もかも図星で何も言えなくなったみたいだねw
結局何もかも図星で何も言えなくなったみたいだねw
147132人目の素数さん
2024/07/21(日) 08:16:23.31ID:Sm0Lj6hf148132人目の素数さん
2024/07/21(日) 08:18:12.79ID:Sm0Lj6hf 図星といえば、尿瓶チンパフェチのPhimoseくんは嫁なし だろう。
その理由を推測せよ。
(1)稼ぎが悪いから (2)Phimose草杉だから (3)罵倒を悦びとするから
複数回答可。
その理由を推測せよ。
(1)稼ぎが悪いから (2)Phimose草杉だから (3)罵倒を悦びとするから
複数回答可。
149132人目の素数さん
2024/07/21(日) 09:12:45.26ID:yNeLjgJ4150132人目の素数さん
2024/07/21(日) 10:22:10.99ID:3skoHSGy151132人目の素数さん
2024/07/21(日) 10:23:54.57ID:3skoHSGy152132人目の素数さん
2024/07/21(日) 11:02:16.80ID:7gLehhCn >>148
図星といえば、偽医者さんはニートだろう
その理由を推測せよ。
(1)朝から何の有益性も無い書き込みをしているから
(2)医者板では医者のフリをする発言をしても全部論破されるから
(3)罵倒を悦びとするような糞スレを立てているから
複数回答可。
図星といえば、偽医者さんはニートだろう
その理由を推測せよ。
(1)朝から何の有益性も無い書き込みをしているから
(2)医者板では医者のフリをする発言をしても全部論破されるから
(3)罵倒を悦びとするような糞スレを立てているから
複数回答可。
153132人目の素数さん
2024/07/21(日) 11:04:12.06ID:7gLehhCn154132人目の素数さん
2024/07/21(日) 11:24:09.98ID:3skoHSGy155132人目の素数さん
2024/07/21(日) 11:51:38.09ID:3skoHSGy Wolframのデフォルトのソルバーは遅いなぁ。
自作ソルバーとの速度比較
Wolfram Language 14.0.0 Engine for Microsoft Windows (64-bit)
Copyright 1988-2023 Wolfram Research, Inc.
In[1]:= n=40;
In[2]:= x={x1,x2,x3,x4} /. Solve[x1+x2+x3+x4==n && x1>=1 && x2>=1 && x3>=1 && x4>=1,{x1,x2,x3,x4},Integers] // Timing // Short
Out[2]//Short= {0.1875, {{1, 1, 1, 37}, {1, 1, 2, 36}, {1, <<2>>, 35}, <<9135>>, {37, 1, 1, 1}}}
In[3]:= x=Select[Partition[Flatten@Table[{x1,x2,x3,n-x1-x2-x3},{x1,Range[n]},{x2,Range[n]},{x3,Range[n]}],4],#[[4]]>0&] // Timing // Short
Out[3]//Short= {0.015625, {{1, 1, 1, 37}, {1, 1, 2, 36}, {1, <<3>>}, <<9135>>, {37, 1, 1, 1}}}
自作ソルバーとの速度比較
Wolfram Language 14.0.0 Engine for Microsoft Windows (64-bit)
Copyright 1988-2023 Wolfram Research, Inc.
In[1]:= n=40;
In[2]:= x={x1,x2,x3,x4} /. Solve[x1+x2+x3+x4==n && x1>=1 && x2>=1 && x3>=1 && x4>=1,{x1,x2,x3,x4},Integers] // Timing // Short
Out[2]//Short= {0.1875, {{1, 1, 1, 37}, {1, 1, 2, 36}, {1, <<2>>, 35}, <<9135>>, {37, 1, 1, 1}}}
In[3]:= x=Select[Partition[Flatten@Table[{x1,x2,x3,n-x1-x2-x3},{x1,Range[n]},{x2,Range[n]},{x3,Range[n]}],4],#[[4]]>0&] // Timing // Short
Out[3]//Short= {0.015625, {{1, 1, 1, 37}, {1, 1, 2, 36}, {1, <<3>>}, <<9135>>, {37, 1, 1, 1}}}
156132人目の素数さん
2024/07/21(日) 13:21:18.86ID:3skoHSGy157132人目の素数さん
2024/07/21(日) 15:50:32.94ID:Bd8wibbu158132人目の素数さん
2024/07/21(日) 15:51:49.71ID:Bd8wibbu >>142
Wolfram使えても中学受験の問題は解けませんよ
Wolfram使えても中学受験の問題は解けませんよ
159132人目の素数さん
2024/07/21(日) 16:13:17.38ID:yNeLjgJ4 >>151
日本語読めないチンパン数学()に答えとかw
日本語読めないチンパン数学()に答えとかw
160132人目の素数さん
2024/07/21(日) 16:49:28.07ID:7gLehhCn 何で偽医者さんって頑なに医者のフリするんだろうね
数学も英語も国語も出来ない精神疾患持ちの人が医者なわけないじゃん
二期校最後の年に受験に失敗して医者コンプになったんでしょ?
数学も英語も国語も出来ない精神疾患持ちの人が医者なわけないじゃん
二期校最後の年に受験に失敗して医者コンプになったんでしょ?
161132人目の素数さん
2024/07/21(日) 16:57:47.02ID:3skoHSGy >>156
想定解
In[3]:= calc[40,3]
4660364912515525380760230058213856169
Out[3]= ---------------------------------------
312500000000000000000000000000000000000
In[4]:= N[%,50]
Out[4]= 0.01491316772004968121843273618628433974080
想定解
In[3]:= calc[40,3]
4660364912515525380760230058213856169
Out[3]= ---------------------------------------
312500000000000000000000000000000000000
In[4]:= N[%,50]
Out[4]= 0.01491316772004968121843273618628433974080
162132人目の素数さん
2024/07/21(日) 16:59:17.72ID:3skoHSGy 病棟がコロナクラスタ化したので新入院を受けられなくなった。
職員へのベクルリーは外来投与にした。
職員へのベクルリーは外来投与にした。
163132人目の素数さん
2024/07/21(日) 19:35:40.52ID:quiimUEg n=40 (人)
A 4/10
O 3/10
B 2/10
AB 1/10
{A, O, B} = (9^n - 7^n - 6^n - 5^n + 4^n + 3^n + 2^n) / 10^n
= 1478 02449 23199 67373 64611 39974 09909 69152 / 10^n,
{A, O, AB} = (8^n - 7^n - 5^n + 3^n + 1) / 10^n
= 13 22861 18092 90598 39346 44870 50476 58752 / 10^n,
{A, B, AB} = (7^n - 6^n - 5^n - 3^n + 4^n + 2^n + 1) / 10^n
= 6353 42917 26320 80184 34148 67722 61952 / 10^n,
{O, B, AB} = (6^n - 5^n - 4^n + 2^n + 1) / 10^n
= 13 35839 83829 00185 17193 00325 07552 / 10^n,
合計 1491 31677 20049 68121 84327 36186 28433 97408 / 10^n
= 0.01491 31677 20049 68121 84327 36186 28433 97408
A 4/10
O 3/10
B 2/10
AB 1/10
{A, O, B} = (9^n - 7^n - 6^n - 5^n + 4^n + 3^n + 2^n) / 10^n
= 1478 02449 23199 67373 64611 39974 09909 69152 / 10^n,
{A, O, AB} = (8^n - 7^n - 5^n + 3^n + 1) / 10^n
= 13 22861 18092 90598 39346 44870 50476 58752 / 10^n,
{A, B, AB} = (7^n - 6^n - 5^n - 3^n + 4^n + 2^n + 1) / 10^n
= 6353 42917 26320 80184 34148 67722 61952 / 10^n,
{O, B, AB} = (6^n - 5^n - 4^n + 2^n + 1) / 10^n
= 13 35839 83829 00185 17193 00325 07552 / 10^n,
合計 1491 31677 20049 68121 84327 36186 28433 97408 / 10^n
= 0.01491 31677 20049 68121 84327 36186 28433 97408
164132人目の素数さん
2024/07/21(日) 19:38:05.56ID:quiimUEg {A, O, B, AB}
4種 0.98508 61942 60805 90548 46471 54639 21255 11296
3種 0.01491 31677 20049 68121 84327 36186 28433 97408
2種 0.00000 06380 19144 29240 31223 81055 72878 28542
1種 0.00000 00000 00000 12089 37977 28118 77432 62754
4種 0.98508 61942 60805 90548 46471 54639 21255 11296
3種 0.01491 31677 20049 68121 84327 36186 28433 97408
2種 0.00000 06380 19144 29240 31223 81055 72878 28542
1種 0.00000 00000 00000 12089 37977 28118 77432 62754
165132人目の素数さん
2024/07/21(日) 20:17:14.76ID:MAlNFasp >>162
医者のフリしないでよ偽医者さん
医者のフリしないでよ偽医者さん
166132人目の素数さん
2024/07/21(日) 20:24:03.71ID:3skoHSGy 血液型の頻度比はA:O:B:AB=4:3:2:1とする。
無作為に3人の血液を集めたら2種類の血液型が存在する確率が最も高い。
無作為に4人の血液を集めたら3種類の血液型が存在する確率が最も高い。
(1) 何人以上の血液を集めれば4種類の血液型が存在する確率を最も高くできるか?
(2) 何人以上の血液を集めれば4種類の血液型が存在する確率が0.5を超えるか?
(3) (1)(2)を満たす最小人数で4種類の血液型が存在する確率を分数で求めよ。
無作為に3人の血液を集めたら2種類の血液型が存在する確率が最も高い。
無作為に4人の血液を集めたら3種類の血液型が存在する確率が最も高い。
(1) 何人以上の血液を集めれば4種類の血液型が存在する確率を最も高くできるか?
(2) 何人以上の血液を集めれば4種類の血液型が存在する確率が0.5を超えるか?
(3) (1)(2)を満たす最小人数で4種類の血液型が存在する確率を分数で求めよ。
167132人目の素数さん
2024/07/21(日) 20:29:03.82ID:yNeLjgJ4168132人目の素数さん
2024/07/21(日) 20:29:24.46ID:3skoHSGy 医師が羨ましければ再受験すればいいのに
俺の同期は2割以上は再受験組だったぞ。
歯学部には東大数学科卒もいた。
東大卒の獣医免許持ちもいた。
俺の同期は2割以上は再受験組だったぞ。
歯学部には東大数学科卒もいた。
東大卒の獣医免許持ちもいた。
169132人目の素数さん
2024/07/21(日) 20:30:01.56ID:yNeLjgJ4170132人目の素数さん
2024/07/21(日) 20:35:59.93ID:3skoHSGy >>167
3日投与だよ。
初日2バイアル、あと2日は1バイアルで4バイアルが1人分としてセットされている。生食で直接溶解できないので注射用と一緒にセットになっている。
ハンプも生食で直接溶解は不可。サイレースは注射用水で溶解と規定されているが前の勤務先では生食で溶解して問題なかったな。
3日投与だよ。
初日2バイアル、あと2日は1バイアルで4バイアルが1人分としてセットされている。生食で直接溶解できないので注射用と一緒にセットになっている。
ハンプも生食で直接溶解は不可。サイレースは注射用水で溶解と規定されているが前の勤務先では生食で溶解して問題なかったな。
171132人目の素数さん
2024/07/21(日) 20:41:21.18ID:3skoHSGy172132人目の素数さん
2024/07/21(日) 20:45:28.54ID:3skoHSGy 薬屋の売り子しかできない医者ならではの記述だね
173132人目の素数さん
2024/07/21(日) 20:49:29.57ID:yNeLjgJ4174132人目の素数さん
2024/07/21(日) 20:59:06.31ID:3skoHSGy 麻酔のバイトをやっていた病院でもベクルリーは早期に始めて3日投与のプロトコールだった。
1バイアルの薬価46498円。肺炎まで悪化させて5日使うのは悪徳病院。
1バイアルの薬価46498円。肺炎まで悪化させて5日使うのは悪徳病院。
175132人目の素数さん
2024/07/21(日) 21:06:57.47ID:3skoHSGy >>163
面倒な計算、ありがとうございます。
想定解と合致していて安堵。
Wolfram言語のトレーニングに n 人に m 種類の血液型が存在する確率を計算する小道具(場合分けして集計しているだけ)を作成
calc[n_,m_] :=(
If[m<1||m>4,Return[0]];
f[x_] :=(
{p1,p2,p3,p4}={1/10,2/10,3/10,4/10};
{b1,b2,b3,b4}=x;
Binomial[n,b1] p1^b1 Binomial[n-b1,b2] p2^b2 Binomial[n-b1-b2,b3] p3^b3 p4^b4
);
x=Select[Partition[Flatten@Table[{x1,x2,x3,n-x1-x2-x3},{x1,Range[0,n]},{x2,Range[0,n]},{x3,Range[0,n]}],4],#[[4]]>=0&];
Total[f /@ Select[x,Total@Boole@Table[#[[i]]>0,{i,Range[4]}]==m&]]
)
別法で計算してくれた値と合致しているので、正しい計算をしている予感。
乱数発生させてのシミュレーションである程度、正答の確信がもてるが、
確率が0.014913程度だとシミュレーションでの確認が回数を増やさないと近似が悪い。
1000万回やって
n=40;
m=3;
k=10^7;
N@Mean@Table[Boole[Length@Union@RandomChoice[Range[4]/10->Range[4],n]==m],k]
0.0149423
面倒な計算、ありがとうございます。
想定解と合致していて安堵。
Wolfram言語のトレーニングに n 人に m 種類の血液型が存在する確率を計算する小道具(場合分けして集計しているだけ)を作成
calc[n_,m_] :=(
If[m<1||m>4,Return[0]];
f[x_] :=(
{p1,p2,p3,p4}={1/10,2/10,3/10,4/10};
{b1,b2,b3,b4}=x;
Binomial[n,b1] p1^b1 Binomial[n-b1,b2] p2^b2 Binomial[n-b1-b2,b3] p3^b3 p4^b4
);
x=Select[Partition[Flatten@Table[{x1,x2,x3,n-x1-x2-x3},{x1,Range[0,n]},{x2,Range[0,n]},{x3,Range[0,n]}],4],#[[4]]>=0&];
Total[f /@ Select[x,Total@Boole@Table[#[[i]]>0,{i,Range[4]}]==m&]]
)
別法で計算してくれた値と合致しているので、正しい計算をしている予感。
乱数発生させてのシミュレーションである程度、正答の確信がもてるが、
確率が0.014913程度だとシミュレーションでの確認が回数を増やさないと近似が悪い。
1000万回やって
n=40;
m=3;
k=10^7;
N@Mean@Table[Boole[Length@Union@RandomChoice[Range[4]/10->Range[4],n]==m],k]
0.0149423
176132人目の素数さん
2024/07/21(日) 21:16:33.51ID:MAlNFasp >>170
3日でも外来投与するならおかしいじゃないですか?偽医者さん
3日でも外来投与するならおかしいじゃないですか?偽医者さん
177132人目の素数さん
2024/07/21(日) 21:34:30.71ID:3skoHSGy >>166(Wolfram言語での想定解)
Wolfram Language 14.0.0 Engine for Microsoft Windows (64-bit)
Copyright 1988-2023 Wolfram Research, Inc.
In[1]:= calc[n_,m_] :=(
If[m<1||m>4,Return[0]];
f[x_] :=(
{p1,p2,p3,p4}={1/10,2/10,3/10,4/10};
{b1,b2,b3,b4}=x;
Binomial[n,b1] p1^b1 Binomial[n-b1,b2] p2^b2 Binomial[n-b1-b2,b3] p3^b3 p4^b4
);
x=Select[Partition[Flatten@Table[{x1,x2,x3,n-x1-x2-x3},{x1,Range[0,n]},{x2,Range[0,n]},{x3,Range[0,n]}],4],#[[4]]>=0&];
Total[f /@ Select[x,Total@Boole@Table[#[[i]]>0,{i,Range[4]}]==m&]]
)
In[2]:= Table[calc[2,i],{i,1,4}]
3 7
Out[2]= {--, --, 0, 0}
10 10
In[3]:= Table[calc[3,i],{i,1,4}]
1 3 3
Out[3]= {--, -, --, 0}
10 5 10
In[4]:= Table[calc[4,i],{i,1,4}]
177 2111 303 36
Out[4]= {----, ----, ---, ---}
5000 5000 625 625
In[5]:= Table[calc[5,i],{i,1,4}]
13 141 561 18
Out[5]= {----, ---, ----, ---}
1000 500 1000 125
In[6]:= Table[calc[6,i],{i,1,4}]
489 18571 2859 297
Out[6]= {------, ------, ----, ----}
100000 100000 5000 1250
In[7]:= Table[calc[7,i],{i,1,4}]
187 6111 54831 819
Out[7]= {------, -----, ------, ----}
100000 50000 100000 2500
In[8]:= Table[calc[8,i],{i,1,4}]
36177 4040351 1590309 319977
Out[8]= {--------, --------, -------, ------}
50000000 50000000 3125000 781250
In[9]:= Table[calc[9,i],{i,1,4}]
14117 1344309 23183889 753543
Out[9]= {--------, --------, --------, -------}
50000000 25000000 50000000 1562500
In[10]:= Table[calc[10,i],{i,1,4}]
22173 7205087 4179633 1364751
Out[10]= {---------, ---------, --------, -------}
200000000 200000000 10000000 2500000
小数表示
{0.3, 0.7, 0., 0.}
{0.1, 0.6, 0.3, 0.}
{0.0354, 0.4222, 0.4848, 0.0576}
{0.013, 0.282, 0.561, 0.144}
{0.00489, 0.18571, 0.5718, 0.2376}
{0.00187, 0.12222, 0.54831, 0.3276}
{0.00072354, 0.080807, 0.508899, 0.409571}
{0.00028234, 0.0537724, 0.463678, 0.482268}
{0.000110865, 0.0360254, 0.417963, 0.5459}
0.5を超えるのは10人以上。
Wolfram Language 14.0.0 Engine for Microsoft Windows (64-bit)
Copyright 1988-2023 Wolfram Research, Inc.
In[1]:= calc[n_,m_] :=(
If[m<1||m>4,Return[0]];
f[x_] :=(
{p1,p2,p3,p4}={1/10,2/10,3/10,4/10};
{b1,b2,b3,b4}=x;
Binomial[n,b1] p1^b1 Binomial[n-b1,b2] p2^b2 Binomial[n-b1-b2,b3] p3^b3 p4^b4
);
x=Select[Partition[Flatten@Table[{x1,x2,x3,n-x1-x2-x3},{x1,Range[0,n]},{x2,Range[0,n]},{x3,Range[0,n]}],4],#[[4]]>=0&];
Total[f /@ Select[x,Total@Boole@Table[#[[i]]>0,{i,Range[4]}]==m&]]
)
In[2]:= Table[calc[2,i],{i,1,4}]
3 7
Out[2]= {--, --, 0, 0}
10 10
In[3]:= Table[calc[3,i],{i,1,4}]
1 3 3
Out[3]= {--, -, --, 0}
10 5 10
In[4]:= Table[calc[4,i],{i,1,4}]
177 2111 303 36
Out[4]= {----, ----, ---, ---}
5000 5000 625 625
In[5]:= Table[calc[5,i],{i,1,4}]
13 141 561 18
Out[5]= {----, ---, ----, ---}
1000 500 1000 125
In[6]:= Table[calc[6,i],{i,1,4}]
489 18571 2859 297
Out[6]= {------, ------, ----, ----}
100000 100000 5000 1250
In[7]:= Table[calc[7,i],{i,1,4}]
187 6111 54831 819
Out[7]= {------, -----, ------, ----}
100000 50000 100000 2500
In[8]:= Table[calc[8,i],{i,1,4}]
36177 4040351 1590309 319977
Out[8]= {--------, --------, -------, ------}
50000000 50000000 3125000 781250
In[9]:= Table[calc[9,i],{i,1,4}]
14117 1344309 23183889 753543
Out[9]= {--------, --------, --------, -------}
50000000 25000000 50000000 1562500
In[10]:= Table[calc[10,i],{i,1,4}]
22173 7205087 4179633 1364751
Out[10]= {---------, ---------, --------, -------}
200000000 200000000 10000000 2500000
小数表示
{0.3, 0.7, 0., 0.}
{0.1, 0.6, 0.3, 0.}
{0.0354, 0.4222, 0.4848, 0.0576}
{0.013, 0.282, 0.561, 0.144}
{0.00489, 0.18571, 0.5718, 0.2376}
{0.00187, 0.12222, 0.54831, 0.3276}
{0.00072354, 0.080807, 0.508899, 0.409571}
{0.00028234, 0.0537724, 0.463678, 0.482268}
{0.000110865, 0.0360254, 0.417963, 0.5459}
0.5を超えるのは10人以上。
178132人目の素数さん
2024/07/21(日) 21:41:12.17ID:aY80opx9 外来投与とは書かれていない
暗に正規の3日投与で効果が出ないのに、5日投与は保険点数稼ぐ以外の何物でもない
というお話で普通は様子見 素人目でも
暗に正規の3日投与で効果が出ないのに、5日投与は保険点数稼ぐ以外の何物でもない
というお話で普通は様子見 素人目でも
179132人目の素数さん
2024/07/21(日) 22:35:12.09ID:MAlNFasp181132人目の素数さん
2024/07/21(日) 23:03:56.51ID:yNeLjgJ4 また脳内医療で適当に押し切ろうとしてるけどやっぱり素人を騙す知能なんかなかったみたいw
182132人目の素数さん
2024/07/21(日) 23:23:25.56ID:3skoHSGy >>175
可読性を度外視して1行に纏めた。自分でも解読するのに難渋しそう。
* 血液型頻度比はA:O:B:AB=4:3:2:1, n 人に m 種類の血液型が存在する確率 *)
solve[n_,m_] := Total[Binomial[n,#[[1]]] (1/10)^#[[1]] Binomial[n-#[[1]],#[[2]]] (2/10)^#[[2]] Binomial[n-#[[1]]-#[[2]],#[[3]]] (3/10)^#[[3]] (4/10)^#[[4]]& /@ (Select[Select[Partition[Flatten@Table[{x1,x2,x3,n-x1-x2-x3},{x1,Range[0,n]},{x2,Range[0,n]},{x3,Range[0,n]}],4],#[[4]]>=0&],Total@Boole@Table[#[[i]]>0,{i,Range[4]}] == m &])]
実行結果
In[1]:= solve[n_,m_] := Total[Binomial[n,#[[1]]] (1/10)^#[[1]] Binomial[n-#[[1]],#[[2]]] (2/10)^#[[2]] Binomial[n-#[[1]]-#[[2]],#[[3]]] (3/10)^#[[3]] (4/10)^#[[4]]& /@ (Select[Select[Partition[Flatten@Table[{x1,x2,x3,n-x1-x2-x3},{x1,Range[0,n]},{x2,Range[0,n]},{x3,Range[0,n]}],4],#[[4]]>=0&],Total@Boole@Table[#[[i]]>0,{i,Range[4]}] == m &])]
In[2]:= solve[40,3]
4660364912515525380760230058213856169
Out[2]= ---------------------------------------
312500000000000000000000000000000000000
尿瓶チンパフェチの嫁なしPhimoseくん(別名、自演認定厨)はWolfram言語はわからないみたいだな。
初学の俺と達人のコードが区別できないみたいだし。
嫁なしPhimoseくんが自演認定厨であることは度々、識者より指摘されている。
俺の想定解よりエレガントな解が投稿されていることを理解できないようだ。
可読性を度外視して1行に纏めた。自分でも解読するのに難渋しそう。
* 血液型頻度比はA:O:B:AB=4:3:2:1, n 人に m 種類の血液型が存在する確率 *)
solve[n_,m_] := Total[Binomial[n,#[[1]]] (1/10)^#[[1]] Binomial[n-#[[1]],#[[2]]] (2/10)^#[[2]] Binomial[n-#[[1]]-#[[2]],#[[3]]] (3/10)^#[[3]] (4/10)^#[[4]]& /@ (Select[Select[Partition[Flatten@Table[{x1,x2,x3,n-x1-x2-x3},{x1,Range[0,n]},{x2,Range[0,n]},{x3,Range[0,n]}],4],#[[4]]>=0&],Total@Boole@Table[#[[i]]>0,{i,Range[4]}] == m &])]
実行結果
In[1]:= solve[n_,m_] := Total[Binomial[n,#[[1]]] (1/10)^#[[1]] Binomial[n-#[[1]],#[[2]]] (2/10)^#[[2]] Binomial[n-#[[1]]-#[[2]],#[[3]]] (3/10)^#[[3]] (4/10)^#[[4]]& /@ (Select[Select[Partition[Flatten@Table[{x1,x2,x3,n-x1-x2-x3},{x1,Range[0,n]},{x2,Range[0,n]},{x3,Range[0,n]}],4],#[[4]]>=0&],Total@Boole@Table[#[[i]]>0,{i,Range[4]}] == m &])]
In[2]:= solve[40,3]
4660364912515525380760230058213856169
Out[2]= ---------------------------------------
312500000000000000000000000000000000000
尿瓶チンパフェチの嫁なしPhimoseくん(別名、自演認定厨)はWolfram言語はわからないみたいだな。
初学の俺と達人のコードが区別できないみたいだし。
嫁なしPhimoseくんが自演認定厨であることは度々、識者より指摘されている。
俺の想定解よりエレガントな解が投稿されていることを理解できないようだ。
183132人目の素数さん
2024/07/21(日) 23:27:39.87ID:3skoHSGy BruteForceでの自作ソルバーがデフォルトのソルバーより高速なのは意外だった。
まあ、デフォルトのSolveが万能なゆえに、特化した自作ソルバーより時間がかかるのだろう。
ブラックボックスに算出させているのは気持ち悪いのでなるべく自作する。
まあ、デフォルトのSolveが万能なゆえに、特化した自作ソルバーより時間がかかるのだろう。
ブラックボックスに算出させているのは気持ち悪いのでなるべく自作する。
184132人目の素数さん
2024/07/21(日) 23:43:56.23ID:yNeLjgJ4 >>182
素人なら騙せると思ってる浅はかなチンパン脳内医療()とチンパン数学()
素人なら騙せると思ってる浅はかなチンパン脳内医療()とチンパン数学()
185132人目の素数さん
2024/07/22(月) 00:02:06.70ID:jzQg3t9F >>164
A,B,C,D となる確率を a,b,c,d とする。
a+b+c+d = 1
ド・モルガンより
1種類: a^n + b^n + c^n + d^n,
2種類: (a+b)^n + (a+c)^n + (a+d)^n + (b+c)^n + (b+d)^n + (c+d)^n
- 3a^n - 3b^n - 3c^n - 3d^n,
3種類: (a+b+c)^n + (b+c+d)^n + (c+d+a)^n + (d+a+b)^n
-2(a+b)^n -2(a+c)^n -2(a+d)^n -2(b+c)^n -2(b+d)^n -2(c+d)^n
+ 3a^n + 3b^n + 3c^n + 3d^n,
4種類: 1 - (a+b+c)^n - (b+c+d)^n - (c+d+a)^n - (d+a+b)^n
+ (a+b)^n + (a+c)^n + (a+d)^n + (b+c)^n + (b+d)^n + (c+d)^n
- a^n - b^n - c^n - d^n,
4種類の確率が 0.5 となるのは n=9.2652 のとき。
A,B,C,D となる確率を a,b,c,d とする。
a+b+c+d = 1
ド・モルガンより
1種類: a^n + b^n + c^n + d^n,
2種類: (a+b)^n + (a+c)^n + (a+d)^n + (b+c)^n + (b+d)^n + (c+d)^n
- 3a^n - 3b^n - 3c^n - 3d^n,
3種類: (a+b+c)^n + (b+c+d)^n + (c+d+a)^n + (d+a+b)^n
-2(a+b)^n -2(a+c)^n -2(a+d)^n -2(b+c)^n -2(b+d)^n -2(c+d)^n
+ 3a^n + 3b^n + 3c^n + 3d^n,
4種類: 1 - (a+b+c)^n - (b+c+d)^n - (c+d+a)^n - (d+a+b)^n
+ (a+b)^n + (a+c)^n + (a+d)^n + (b+c)^n + (b+d)^n + (c+d)^n
- a^n - b^n - c^n - d^n,
4種類の確率が 0.5 となるのは n=9.2652 のとき。
186132人目の素数さん
2024/07/22(月) 00:20:48.63ID:XNyK2Lk/187132人目の素数さん
2024/07/22(月) 00:41:00.38ID:XNyK2Lk/ どの道尿瓶ジジイのスレ違いのチンパン数学()にまともに答えようとしているアホも尿瓶と同レベルなのは言うまでもないけどな
自演認定厨って発狂してるってやっぱ図星みたいねw
自演認定厨って発狂してるってやっぱ図星みたいねw
188132人目の素数さん
2024/07/22(月) 07:38:02.37ID:iJH8MVBw189132人目の素数さん
2024/07/22(月) 08:31:02.99ID:2lxQVdPp だとしても話が全部古いから随分前にクビになったみたいだがw
190132人目の素数さん
2024/07/22(月) 08:31:53.23ID:jQ5nyGjT 車輪の再発明するやつの常套句
いつまでもいつまでも同じレベルのところで足踏みするクズ
いつまでもいつまでも同じレベルのところで足踏みするクズ
191132人目の素数さん
2024/07/22(月) 11:40:13.83ID:iepWT9On 内視鏡バイトの帰りにスマホで計算する問題
血液型の頻度比はA:O:B:AB=4:3:2:1とする。
40人を採血したときにどの血液型も複数人いる確率を分数で求めよ。
血液型の頻度比はA:O:B:AB=4:3:2:1とする。
40人を採血したときにどの血液型も複数人いる確率を分数で求めよ。
192132人目の素数さん
2024/07/22(月) 11:43:32.97ID:iepWT9On193132人目の素数さん
2024/07/22(月) 11:46:51.03ID:iepWT9On ベクルリーは1日1回投与だから外来投薬は容易。
セフトリアキソン外来で点滴とか普通にするが、
ゾシンだとそうはいかない。最近はゾロのタゾピペだが。
セフトリアキソン外来で点滴とか普通にするが、
ゾシンだとそうはいかない。最近はゾロのタゾピペだが。
194132人目の素数さん
2024/07/22(月) 11:48:35.26ID:iepWT9On195132人目の素数さん
2024/07/22(月) 11:54:05.10ID:iepWT9On ザルティアでシアリスの代用してはいけない(業界ネタ)
196132人目の素数さん
2024/07/22(月) 12:00:29.96ID:iepWT9On >>191
場合分けして集計するだけ。
筆算でも可能だろうがどうやって効率的にするかの問題。
電卓だと表示桁数が足りなくなると思う。
東大卒やエリート高校生には容易だろう。
嫁なしPhimoseくんのキーキー電卓では集計できないようだが。
場合分けして集計するだけ。
筆算でも可能だろうがどうやって効率的にするかの問題。
電卓だと表示桁数が足りなくなると思う。
東大卒やエリート高校生には容易だろう。
嫁なしPhimoseくんのキーキー電卓では集計できないようだが。
197132人目の素数さん
2024/07/22(月) 12:38:54.68ID:Y93q6nhZ 正の整数nと有理数pの組(n,p)で、n+(1/n)=p^2を満たすものが存在するならば、すべて求めよ。
198132人目の素数さん
2024/07/22(月) 12:58:18.24ID:ULPBznRV >>191
Sum[n4=40-n1-n2-n3;Boole[n1>1] Boole[n2>1] Boole[n3>1] Boole[n4>1] Multinomial[n1,n2,n3,n4] (4/10)^n1 (3/10)^n2 (2/10)^n3 (1/10)^n4,{n1,0,40},{n2,0,40-n1},{n3,0,40-n1-n2}]
= 17931735688870232246983662877718870163/19531250000000000000000000000000000000
= 0.918104867270156...
Booleの積を Boole[Boole[n1>0]+Boole[n2>0]+Boole[n3>0]+Boole[n4>0]==3] に置き換えると>>156に使えるが、牛刀
Sum[n4=40-n1-n2-n3;Boole[n1>1] Boole[n2>1] Boole[n3>1] Boole[n4>1] Multinomial[n1,n2,n3,n4] (4/10)^n1 (3/10)^n2 (2/10)^n3 (1/10)^n4,{n1,0,40},{n2,0,40-n1},{n3,0,40-n1-n2}]
= 17931735688870232246983662877718870163/19531250000000000000000000000000000000
= 0.918104867270156...
Booleの積を Boole[Boole[n1>0]+Boole[n2>0]+Boole[n3>0]+Boole[n4>0]==3] に置き換えると>>156に使えるが、牛刀
199132人目の素数さん
2024/07/22(月) 13:19:20.11ID:pn0wO9Tj >>196
高校数学スレで配偶者がいないことが罵倒になると考える程度の頭の持ち主
そりゃスレタイもテンプレも読まないし読めないし延々とスレ違い行為続けるわけだ
事実を元にこうした指摘をしても、
妄想による嫁無しPhioseで論破したつもりになっちゃうのも最高にダサい
高校数学スレで配偶者がいないことが罵倒になると考える程度の頭の持ち主
そりゃスレタイもテンプレも読まないし読めないし延々とスレ違い行為続けるわけだ
事実を元にこうした指摘をしても、
妄想による嫁無しPhioseで論破したつもりになっちゃうのも最高にダサい
200132人目の素数さん
2024/07/22(月) 13:28:26.45ID:ofTD9Unl tan1°は有理数か
この問題の証明の仕方を教えてください
この問題の証明の仕方を教えてください
201132人目の素数さん
2024/07/22(月) 13:57:03.02ID:o5k1+uIe 高校の範囲ならば
以下の通り背理法で示す
tanα, tanβ がともに有理数ならば
tan(α+β)=(tanα+tanβ)(1+tanα・tanβ)
もまた有理数である
tan1° が有理数と仮定すると
これを足し合わせた tan30° も有理数である
しかし tan30°=1/√3 は無理数で矛盾する
よって tan1° は無理数である
以下の通り背理法で示す
tanα, tanβ がともに有理数ならば
tan(α+β)=(tanα+tanβ)(1+tanα・tanβ)
もまた有理数である
tan1° が有理数と仮定すると
これを足し合わせた tan30° も有理数である
しかし tan30°=1/√3 は無理数で矛盾する
よって tan1° は無理数である
202132人目の素数さん
2024/07/22(月) 13:58:10.72ID:o5k1+uIe 分数の線が抜けてた
tan(α+β)=(tanα+tanβ)/(1+tanα・tanβ)
まいっか
tan(α+β)=(tanα+tanβ)/(1+tanα・tanβ)
まいっか
203132人目の素数さん
2024/07/22(月) 14:16:11.69ID:nCTwCtt3 >>193
そもそも入院してない軽症の人なのにベクルリーって高い薬をわざわざ毎日来てもらって打つの?3日間連続で来てもらうってこと
?本当にみんなそんな事やってるの?
何かおかしくないか?
俺コロナかかってもカロナール出されて普通に帰されたけど
そもそも入院してない軽症の人なのにベクルリーって高い薬をわざわざ毎日来てもらって打つの?3日間連続で来てもらうってこと
?本当にみんなそんな事やってるの?
何かおかしくないか?
俺コロナかかってもカロナール出されて普通に帰されたけど
204132人目の素数さん
2024/07/22(月) 14:50:51.60ID:/ZCZ+FDq >>203
もちろん脳内医療です
もちろん脳内医療です
205132人目の素数さん
2024/07/22(月) 15:13:14.11ID:hi/KRuYG >>198
Multinomialって関数があるのか、他の人のコードを読むのは勉強になるなぁ。
Multinomialって関数があるのか、他の人のコードを読むのは勉強になるなぁ。
206132人目の素数さん
2024/07/22(月) 15:13:24.57ID:hi/KRuYG207132人目の素数さん
2024/07/22(月) 15:17:30.59ID:/ZCZ+FDq208132人目の素数さん
2024/07/22(月) 15:24:44.40ID:hi/KRuYG >>198
想定解に同じ。
Wolfram Language 14.0.0 Engine for Microsoft Windows (64-bit)
Copyright 1988-2023 Wolfram Research, Inc.
In[1]:= calc[n_,j_]:=(
{p1,p2,p3,p4}={1/10,2/10,3/10,4/10};
y=Select[Partition[Flatten@Table[{x1,x2,x3,n-x1-x2-x3},{x1,Range[0,n]},{x2,Range[0,n]},{x3,Range[0,n]}],4],#[[4]]>=0&];
fn[x_] :=(
{b1,b2,b3,b4}=x;
Binomial[n,b1] p1^b1 Binomial[n-b1,b2] p2^b2 Binomial[n-b1-b2,b3] p3^b3 p4^b4
);
f1[x_]:= AllTrue[x,#>=j&];
Total[fn /@ Select[y,f1]]
)
In[2]:= calc[40,2]
17931735688870232246983662877718870163
Out[2]= --------------------------------------
19531250000000000000000000000000000000
想定解に同じ。
Wolfram Language 14.0.0 Engine for Microsoft Windows (64-bit)
Copyright 1988-2023 Wolfram Research, Inc.
In[1]:= calc[n_,j_]:=(
{p1,p2,p3,p4}={1/10,2/10,3/10,4/10};
y=Select[Partition[Flatten@Table[{x1,x2,x3,n-x1-x2-x3},{x1,Range[0,n]},{x2,Range[0,n]},{x3,Range[0,n]}],4],#[[4]]>=0&];
fn[x_] :=(
{b1,b2,b3,b4}=x;
Binomial[n,b1] p1^b1 Binomial[n-b1,b2] p2^b2 Binomial[n-b1-b2,b3] p3^b3 p4^b4
);
f1[x_]:= AllTrue[x,#>=j&];
Total[fn /@ Select[y,f1]]
)
In[2]:= calc[40,2]
17931735688870232246983662877718870163
Out[2]= --------------------------------------
19531250000000000000000000000000000000
209132人目の素数さん
2024/07/22(月) 15:27:44.30ID:hi/KRuYG210132人目の素数さん
2024/07/22(月) 15:29:14.46ID:hi/KRuYG 2類の頃は死亡退院例は搬送してくれる葬儀屋がなくて他市の業者に依頼していた。
朝なくなっても搬送は夕方とか。
朝なくなっても搬送は夕方とか。
211132人目の素数さん
2024/07/22(月) 15:37:55.67ID:Y93q6nhZ xy+yz+zx=πのとき、
sin(x)+sin(y)+sin(z)
の取りうる値の範囲を求めよ。
sin(x)+sin(y)+sin(z)
の取りうる値の範囲を求めよ。
212132人目の素数さん
2024/07/22(月) 15:50:56.93ID:+mzNZEA7 >>209
だったらなおのこと入院させて連続投与のほうがいいだろマヌケ
というかアンタずっとスレタイと関係ないことしかほざけなくて目障りなんだけど
日本語理解できないレベルのアホがなんで医療できるんだよ
だったらなおのこと入院させて連続投与のほうがいいだろマヌケ
というかアンタずっとスレタイと関係ないことしかほざけなくて目障りなんだけど
日本語理解できないレベルのアホがなんで医療できるんだよ
213132人目の素数さん
2024/07/22(月) 16:16:30.89ID:eOH2EXqH >>201,202
ありがとうございます
tan30°が無理数であるとし背理法を使う場合、
tan30°が1/√3であることは自明であるとして良いのでしょうか
どこまでを自明として良いのかの判断にいつも悩まされます
ありがとうございます
tan30°が無理数であるとし背理法を使う場合、
tan30°が1/√3であることは自明であるとして良いのでしょうか
どこまでを自明として良いのかの判断にいつも悩まされます
214132人目の素数さん
2024/07/22(月) 17:04:34.06ID:eJi15y7x それが自明かどうか迷うなら正三角形を半分に切った絵を描いておけばいい
というか悩むのはそこか?
というか悩むのはそこか?
215132人目の素数さん
2024/07/22(月) 18:02:55.11ID:nCTwCtt3 >>209
んっ?職員に外来投与って言ってなかった?
職員が90歳の喘息持ちってこと?そもそもそんな人を入院出来ないにしても転院させないの?何か色々意味不明なのは俺が素人だから?素人だからって適当言ってないですかあなた
んっ?職員に外来投与って言ってなかった?
職員が90歳の喘息持ちってこと?そもそもそんな人を入院出来ないにしても転院させないの?何か色々意味不明なのは俺が素人だから?素人だからって適当言ってないですかあなた
216132人目の素数さん
2024/07/22(月) 18:46:58.39ID:+mzNZEA7 >>210
544:卵の名無しさん (JP 0Hcb-kylL [202.253.111.210]):2024/07/22(月) 18:08:56.38 ID:l4OO+QdhH
>>543
ワロタ
流石にそれは入院させるだろ
高校生でも尿瓶ジジイの発言が怪しいって思ってんじゃねーかwww
咽頭喉頭の炎症が嚥下機能不全を起こすっていうのも意味不明過ぎるどういう機序だよwww
普通にコロナでレベル下がって誤嚥しただけだろ
あと誤嚥性の細菌性肺炎ってなんだよwww
そういうの誤嚥性肺炎って普通の医者は表現するんだけど
医者じゃないからそこらへんわかんないんだろうな
545:卵の名無しさん (JP 0Hcb-kylL [202.253.111.210]):2024/07/22(月) 18:13:01.43 ID:l4OO+QdhH
>>543
葬儀屋の話って基本医者関与しないけど
やっぱコイツ事務員だよね
「依頼していた」キリッ
じゃねーよwww
医者が葬儀屋に依頼するわけないだろ
どう見ても医療事務の発言ですわw
コイツアホだなバレバレじゃん
544:卵の名無しさん (JP 0Hcb-kylL [202.253.111.210]):2024/07/22(月) 18:08:56.38 ID:l4OO+QdhH
>>543
ワロタ
流石にそれは入院させるだろ
高校生でも尿瓶ジジイの発言が怪しいって思ってんじゃねーかwww
咽頭喉頭の炎症が嚥下機能不全を起こすっていうのも意味不明過ぎるどういう機序だよwww
普通にコロナでレベル下がって誤嚥しただけだろ
あと誤嚥性の細菌性肺炎ってなんだよwww
そういうの誤嚥性肺炎って普通の医者は表現するんだけど
医者じゃないからそこらへんわかんないんだろうな
545:卵の名無しさん (JP 0Hcb-kylL [202.253.111.210]):2024/07/22(月) 18:13:01.43 ID:l4OO+QdhH
>>543
葬儀屋の話って基本医者関与しないけど
やっぱコイツ事務員だよね
「依頼していた」キリッ
じゃねーよwww
医者が葬儀屋に依頼するわけないだろ
どう見ても医療事務の発言ですわw
コイツアホだなバレバレじゃん
217132人目の素数さん
2024/07/22(月) 19:34:00.55ID:NjtPOL8c218132人目の素数さん
2024/07/22(月) 19:37:40.84ID:NjtPOL8c219132人目の素数さん
2024/07/22(月) 19:39:44.70ID:NjtPOL8c >>216
Covid-19後遺症としての嚥下障害も知らんのかよ。
Covid-19後遺症としての嚥下障害も知らんのかよ。
220132人目の素数さん
2024/07/22(月) 19:49:08.88ID:DDMuXW2j ある数列{an}が次の漸化式を満たすとする。
an+2−5an+1+6an=2n(n=1,2,3,⋯)
a1=1,a2=3のとき、一般項anを求めよ。
an+2−5an+1+6an=2n(n=1,2,3,⋯)
a1=1,a2=3のとき、一般項anを求めよ。
221132人目の素数さん
2024/07/22(月) 19:49:50.62ID:DDMuXW2j 正四面体ABCDにおいて、辺ABの中点をMとする。このとき、次の問いに答えよ。
(1) 線分CMの長さを求めよ。
(2) 平面CDMと平面ABCのなす角を求めよ。
(1) 線分CMの長さを求めよ。
(2) 平面CDMと平面ABCのなす角を求めよ。
222132人目の素数さん
2024/07/22(月) 19:50:26.14ID:DDMuXW2j 関数f(x)=x3−3x2+2xについて、次の問いに答えよ。
(1) f(x)の増減表を作成し、極値を求めよ。
(2) 曲線y=f(x)とx軸で囲まれた図形の面積を求めよ。
(3) 曲線y=f(x)上の点(t,f(t))における接線の傾きの最小値を求めよ。
(1) f(x)の増減表を作成し、極値を求めよ。
(2) 曲線y=f(x)とx軸で囲まれた図形の面積を求めよ。
(3) 曲線y=f(x)上の点(t,f(t))における接線の傾きの最小値を求めよ。
223132人目の素数さん
2024/07/22(月) 19:51:11.96ID:DDMuXW2j 1から5までの数字が一つずつ書かれた5枚のカードがある。このカードから3枚を同時に取り出すとき、次の確率を求めよ。
(1) 取り出した3枚のカードの数字がすべて異なる確率。
(2) 取り出した3枚のカードの数字の積が偶数となる確率。
(1) 取り出した3枚のカードの数字がすべて異なる確率。
(2) 取り出した3枚のカードの数字の積が偶数となる確率。
224132人目の素数さん
2024/07/22(月) 19:56:11.64ID:/ZCZ+FDq225132人目の素数さん
2024/07/22(月) 20:39:26.09ID:rZP1jPhi >>218
何で転院させないの?ってレスは無視するんですか?結局投与したのは職員?90歳喘息持ちの?解説お願い致します
何で転院させないの?ってレスは無視するんですか?結局投与したのは職員?90歳喘息持ちの?解説お願い致します
226132人目の素数さん
2024/07/22(月) 20:41:34.05ID:kdEM+lKB 現在軒並み老齢者有病者が多く、病床はパンク気味なのはいいよね
病院には介護職員がいて死亡→葬儀場の安置所に連絡取ることで、
即、葬儀屋さんが動くのもいいよね
誤嚥性肺炎は細菌が仲立ちしないと肺炎にならないのもいいよね
あのね、もう反発心しかないかもしんないけど>>218氏はすべて真実を言ってるわけ
病院には介護職員がいて死亡→葬儀場の安置所に連絡取ることで、
即、葬儀屋さんが動くのもいいよね
誤嚥性肺炎は細菌が仲立ちしないと肺炎にならないのもいいよね
あのね、もう反発心しかないかもしんないけど>>218氏はすべて真実を言ってるわけ
227132人目の素数さん
2024/07/22(月) 20:43:07.51ID:jzQg3t9F >>220
特性多項式 tt-5t+6 = (t-2)(t-3),
特性値 2, 3
一般項 a[n] = b・2^n + c・3^n + n + 3/2,
b = (3a[1] - a[2] - 4)/2 =−2,
c = (a[2] - 2a[1])/3 + 1/2 = 5/6,
特性多項式 tt-5t+6 = (t-2)(t-3),
特性値 2, 3
一般項 a[n] = b・2^n + c・3^n + n + 3/2,
b = (3a[1] - a[2] - 4)/2 =−2,
c = (a[2] - 2a[1])/3 + 1/2 = 5/6,
228132人目の素数さん
2024/07/22(月) 20:54:22.31ID:/ZCZ+FDq229132人目の素数さん
2024/07/22(月) 20:54:26.56ID:rZP1jPhi230132人目の素数さん
2024/07/22(月) 20:56:21.89ID:rZP1jPhi231132人目の素数さん
2024/07/22(月) 21:05:10.08ID:rZP1jPhi >>226
言ってる事が支離滅裂です
病院なのに介護職がいて即連絡とか言ってますが病院なので介護職じゃなくているのは医者と看護師ですよね?何で介護士が連絡するんですか?病床がパンクして良いよねって倫理的におかしくないですか?このレスが偽医者さんだとしたらこの人が医者だとは到底思えません。僕も来年医学部受けようと考えてますがこんなクズが医者とは思いたくありません
言ってる事が支離滅裂です
病院なのに介護職がいて即連絡とか言ってますが病院なので介護職じゃなくているのは医者と看護師ですよね?何で介護士が連絡するんですか?病床がパンクして良いよねって倫理的におかしくないですか?このレスが偽医者さんだとしたらこの人が医者だとは到底思えません。僕も来年医学部受けようと考えてますがこんなクズが医者とは思いたくありません
232132人目の素数さん
2024/07/22(月) 21:07:34.96ID:/ZCZ+FDq >>226がID:DDMuXW2jの自演じゃないと思う人レスして下さい
233132人目の素数さん
2024/07/22(月) 21:15:20.49ID:jzQg3t9F >>223
全部で C[5,3] = 10 とおりある。
(1) 1
(2) 0.9 … {1,3,5} 以外はすべて偶数。
全部で C[5,3] = 10 とおりある。
(1) 1
(2) 0.9 … {1,3,5} 以外はすべて偶数。
234132人目の素数さん
2024/07/22(月) 21:23:09.67ID:jzQg3t9F235132人目の素数さん
2024/07/22(月) 21:32:27.27ID:jzQg3t9F236132人目の素数さん
2024/07/22(月) 22:17:08.60ID:kdEM+lKB >>230,231
誤嚥性肺炎は誤嚥による細菌肺炎なのでそのまんまという気が
病院には看護士さん、薬剤師さん、理学療法士さん、作業療法士さん等多々いますが
その中で介護福祉士の免許持ってる人が普通にいますよ
今の病院で病床に余裕があると思ってますか
高校生の方だと思いますが、志しを持った勉強をし悪徳医者を駆逐するような
人の気持ちのわかる優しいお医者さんになってください
誤嚥性肺炎は誤嚥による細菌肺炎なのでそのまんまという気が
病院には看護士さん、薬剤師さん、理学療法士さん、作業療法士さん等多々いますが
その中で介護福祉士の免許持ってる人が普通にいますよ
今の病院で病床に余裕があると思ってますか
高校生の方だと思いますが、志しを持った勉強をし悪徳医者を駆逐するような
人の気持ちのわかる優しいお医者さんになってください
237132人目の素数さん
2024/07/22(月) 23:21:13.11ID:/ZCZ+FDq238132人目の素数さん
2024/07/23(火) 00:16:47.70ID:ma6NAjIg >>222
(1)
f(x) = x(x-1)(x-2),
f '(x) = 3xx -6x +2 = 3(x-1)^2−1,
極値 (f '=0) は x = 1±1/√3 にある。
x -∞ … 0 … 1-1/√3 … 1 … 1+1/√3 … 2 … ∞
f(x) -∞ / 0 / 2/(3√3) \ 0 \ -2/(3√3) / 0 / ∞
極大 極小
(2)
∫[0,1] f(x) dx = [ (1/4)x^4 −x^3 +x^2 ](x=0→1) = 1/4,
ー∫[1,2] f(x) dx = 1/4,
両方合わせて 1/2.
(3)
f "(x) = 6(x-1),
f '(x) は x=1 で極小となり
極小値 f '(1) = -1.
(1)
f(x) = x(x-1)(x-2),
f '(x) = 3xx -6x +2 = 3(x-1)^2−1,
極値 (f '=0) は x = 1±1/√3 にある。
x -∞ … 0 … 1-1/√3 … 1 … 1+1/√3 … 2 … ∞
f(x) -∞ / 0 / 2/(3√3) \ 0 \ -2/(3√3) / 0 / ∞
極大 極小
(2)
∫[0,1] f(x) dx = [ (1/4)x^4 −x^3 +x^2 ](x=0→1) = 1/4,
ー∫[1,2] f(x) dx = 1/4,
両方合わせて 1/2.
(3)
f "(x) = 6(x-1),
f '(x) は x=1 で極小となり
極小値 f '(1) = -1.
239132人目の素数さん
2024/07/23(火) 02:36:32.97ID:ma6NAjIg■ このスレッドは過去ログ倉庫に格納されています
ニュース
- カルビー白黒化で87%が「ポテチ」離れ👋👴高齢層ほど顕著な影響 [パンナ・コッタ★]
- ドコモ、34万人の情報をAmazonに無断提供 総務省が行政指導… [BFU★]
- 【トランプ氏「大惨事になる」】米主要都市で左派市長の誕生相次ぐ、中間選挙で「富の偏り是正」掲げ8人当選… [BFU★]
- 「結婚できない趣味ランキング」女性部門ワースト5 (恋愛・婚活アドバイザーがランク付け) [少考さん★]
- スーパーマーケットの「バロー」、東京都初進出 [おっさん友の会★]
- 松山千春、日本国民の労働意識の低さ指摘「働かないから、日本は中国にもインドにも負けてしまいそうな水準になってきてしまった」 [muffin★]
- フライデー・チャイナんなたん(・o・🍬)🏡🌆
- 【衝撃】麒麟の川島明 ←業界でかなり嫌われていた、性格の悪さを暴露されるWWWWWW
- とある暗部の少女共棲 第5話 実況スレ🏡
- 民主党「AIを禁止しろ」→17万いいねwwwwwwwwwwwwwwwwwwwwwww
- 今日開催の氣志團万博、チケットがまったく売れてない
- 【朗報】セクシーな声優の井口裕香さん、執拗に乳首を求めるオタクに苦言!!