[過去ﾛｸﾞ] 高校数学の質問スレ Part437 (1002ﾚｽ)
上下前次1-新
抽出解除 必死ﾁｪｯｶｰ(本家) (べ) 自ID ﾚｽ栞 あぼーん
このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索 歴削→次ｽﾚ 栞削→次ｽﾚ 過去ﾛｸﾞﾒﾆｭｰ
364(1): 2024/07/28(日)05:32 ID:IsVJ9/rg(1/16) AAS
血液型に1,2,3,4の番号を振ってプログラムしたらRとWolframで結果が違ったので
気付いたWolframのCounts関数のバグ
数列{2,0,2,4}に2 と4が各々何個含まれるかをカウントして返すプログラム
{2,4} /. Counts[{2,0,2,4}]
Wolfram Language 14.0.0 Engine for Microsoft Windows (64-bit)
Copyright 1988-2023 Wolfram Research, Inc.
In[1]:= {2,4} /. Counts[{2,0,2,4}]
省10
365(2): 2024/07/28(日)05:36 ID:IsVJ9/rg(2/16) AAS
>>350
並列麻酔やったらその倍の給料になるのでやっている麻酔医もいるが、
俺はリスク高すぎてやれない（というより、自動記録もないような零細病院で
並列麻酔が求められることはない）。
リスクを冒して並列やっても年金支給停止額が増えて実入りが増えないなら
仕事をふやすことはしないね。
366: 2024/07/28(日)05:40 ID:IsVJ9/rg(3/16) AAS
>>356
重婚を認めないという条件があるのでモンテカルロ法での算出は簡単だった。
プログラム例
mate[m_,f_,w_,h_,k_:10^4] :=(
sim[]:=(
wif=Table[RandomSample[Range[f],w],m];
hus=Table[RandomSample[Range[m],h],f];
省5
367: 2024/07/28(日)06:19 ID:IsVJ9/rg(4/16) AAS
>>328
本来、統計用ソフトなのに虚数対応しているのでRで作図して１に収束を体感。
画像ﾘﾝｸ[png]:i.imgur.com
応用問題
lim[n→∞] （1+(i/n)）^n
を求めよ。ただしiは虚数単位である。
作図して答を推測せよ。
370(1): 2024/07/28(日)07:07 ID:IsVJ9/rg(5/16) AAS
プログラム言語ができる人はそれを使って投稿された問題に解答。
罵倒言語しかできない人は罵倒投稿を続けるのみ。得技は自演認定。
エリート高校生の諸君はどちらになりたいですか？
371(2): 2024/07/28(日)07:18 ID:IsVJ9/rg(6/16) AAS
バグではなくて仕様ですと言われるだろうと思っていたが、
この仕様は不親切設計であると思う。
0個と返さないのなら空集合を返してほしいところ。
Wolfram Language 14.0.0 Engine for Microsoft Windows (64-bit)
Copyright 1988-2023 Wolfram Research, Inc.
In[1]:= {1,2,3,4} /. Counts[{}]
Out[1]= {1, 2, 3, 4}
373: 2024/07/28(日)07:39 ID:IsVJ9/rg(7/16) AAS
>>371
おまけ
４類型にするだけなのでCounts類似のCountを使わずに自作関数を作成。
期待通りの値を返してくれる。
Wolfram Language 14.0.0 Engine for Microsoft Windows (64-bit)
Copyright 1988-2023 Wolfram Research, Inc.
In[1]:= counts4[x_] := Table[Total@Boole[#==i& /@ x],{i,1,4}]
省4
374(2): 2024/07/28(日)07:54 ID:IsVJ9/rg(8/16) AAS
>>372
何が自明かは各人により異なるので証明問題はスルーすることにしている。
プログラムネタにはしずらいので。
鳩の巣原理も量子物理の世界では自明ではないらしい。
375: 2024/07/28(日)09:30 ID:IsVJ9/rg(9/16) AAS
複素平面上で(1+i/n)^nの軌跡をn=1,..,100まで描いてみた。
面白みもないので動画にはしなかった。
画像ﾘﾝｸ[png]:i.imgur.com
収束点はcos(1)+i sin(1) = 0.5403023+0.841471i
381(2): 2024/07/28(日)10:50 ID:IsVJ9/rg(10/16) AAS
近似解しか算出できないので質問します。
t を正の実数として複素平面上で(1+i/t)^iの描く軌跡の長さを求めよ。
382: 2024/07/28(日)11:17 ID:IsVJ9/rg(11/16) AAS
訂正 t を正の実数として複素平面上で(1+i/t)^tの描く軌跡の長さを求めよ。
画像ﾘﾝｸ[png]:i.imgur.com
PhimoseくんってWolframのコードが読めないみたいだなぁ。
使用言語は罵倒言語、常套句は自演認定ｗ
383(2): 2024/07/28(日)11:22 ID:IsVJ9/rg(12/16) AAS
>>378
中心極限定理は自明ではないし、
正規分布表の値も自力計算できないのに使っている。
384: 2024/07/28(日)11:28 ID:IsVJ9/rg(13/16) AAS
嫁なしPhimoseくん用に婚活問題を考えたのだがWolfram言語は使えないみたいなので
具体的な数字の計算問題にした。
男性100人、女性50人が婚活をする。
男性は妻の候補を2人、女性は夫の候補を5人指名することができ、
相互の指名が合致したときに成婚となる。
指名はすべて別人で、重婚は認められない。
成婚数の期待値、中央値、最頻値をもとめよ。
省1
390(1): 2024/07/28(日)12:16 ID:IsVJ9/rg(14/16) AAS
t を非零の実数として複素平面上で(1+i/t)^tの描く軌跡を図示せよ。
軌跡の長さと軌跡に囲まれた図形の面積を算出せよ。近似解でもよい。
とりあえず、Rで図示。
画像ﾘﾝｸ[png]:i.imgur.com
391(2): 2024/07/28(日)12:21 ID:IsVJ9/rg(15/16) AAS
>>389
確率は心の中にある。
同様に確からしいというのが仮想現実。
確率は確信の度合いを示す尺度である。
例：
降水確率は予報士の確信の度合いを反映する。
安倍晋三が仮病であった確率もアンケート調査すればよい。
省2
396(4): 2024/07/28(日)13:44 ID:IsVJ9/rg(16/16) AAS
>>390
Rで作図して計測
軌跡長
> L
[1] 2.902528
軌跡の囲む面積
> S
省5
上下前次1-新書関写板覧索設栞歴
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ
ぬこの手 ぬこTOP 0.038s