[過去ﾛｸﾞ] 高校数学の質問スレ Part434 (1002ﾚｽ)

高校数学の質問スレ Part434 http://rio2016.5ch.net/test/read.cgi/math/1712376048/

上下前次1-新
通常表示 512ﾊﾞｲﾄ分割 ﾚｽ栞

---

このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索 歴削→次ｽﾚ 栞削→次ｽﾚ 過去ﾛｸﾞﾒﾆｭｰ

---

402: １３２人目の素数さん [sage] 2024/04/22(月) 08:43:42.58 ID:aSsf4f76 >>365 Wolfram言語の練習に ブートストラップ法で区間推定 ts={14 ,19 ,17 ,13, 20 ,19} k=1*^5 re=Table[Mean[RandomChoice[ts,Length@ts]],k] Mean[re] Quantile[re,{0.025,0.5,0.975}] http://rio2016.5ch.net/test/read.cgi/math/1712376048/402

403: １３２人目の素数さん [sage] 2024/04/22(月) 09:20:00.09 ID:VHMw4BHx ゴミは肝心要の統計がわからんから違う言語を使っても違う言語で同じアホレス繰り返すwwwwwwwwwwa http://rio2016.5ch.net/test/read.cgi/math/1712376048/403

404: １３２人目の素数さん [sage] 2024/04/22(月) 11:51:49.20 ID:aSsf4f76 RandomSampleをRandomChoiceに替えたらbootstrapができた。 indexでRandomIntegerしなくてすんだ。 Rのcombnの相当関数はSelectsだった。 combinationとかenumerationとかで検察したのでみつけられなかった。stackoverflowで検索するのが早道だな。 http://rio2016.5ch.net/test/read.cgi/math/1712376048/404

405: １３２人目の素数さん [sage] 2024/04/22(月) 11:54:58.13 ID:aSsf4f76 >386は図星のようだ。 またまた、 罵倒　＞　助言　の　Phimose草の不等式が実証されてますなぁ 解説 It is as if Mr. Phimose loves to use the expression of 'kusa' that fondles his foreskin too much which has made his hands stink. http://rio2016.5ch.net/test/read.cgi/math/1712376048/405

406: １３２人目の素数さん [] 2024/04/22(月) 12:32:14.49 ID:6ORmhlLT >>383 　s(j) = 1/j^2.0001 Σ[k=1,n] S(k,n) = Σ[j=1,n] j・s(j) 　= Σ[j=1, n] 1/j^1.0001 　< 1 + Σ[j=2, n] ∫[j-1/2,j+1/2] 1/x^1.0001 dx 　= 1 + ∫[3/2, n+1/2] 1/x^1.0001 dx 　= 1 + [−10000/x^0.0001 ](x：3/2→n+1/2) 　= 1 + 10000{(2/3)＾0.0001 − 1/(n+1/2)^0.0001} 　< 1 + 10000・(2/3)^0.0001 　= 10000.59454311188 極限値 　　10000 + γ = 10000.5772156649… http://rio2016.5ch.net/test/read.cgi/math/1712376048/406

407: １３２人目の素数さん [sage] 2024/04/22(月) 12:51:20.62 ID:CjcsDYOy 今日の積分 ∫[0,1] {√(1+t^2)}/t dt （東大理系2013） http://rio2016.5ch.net/test/read.cgi/math/1712376048/407

408: １３２人目の素数さん [sage] 2024/04/22(月) 14:17:36.46 ID:5FMlnt/L >>388 温度の期待値の区間をBootstrap法で推定。 Wolfram言語の練習 In[11]:= ts={9,7,8,8,12,13,10,14,13,15,19,19,16,12,7,2,2,7,3,5,9,5,8,13,15,11,13,12,9,4}; In[12]:= k=1*^5; In[13]:= re=Table[Mean[RandomChoice[ts,Length@ts]],k]; In[14]:= Mean[re] // N Out[14]= 10.002 In[15]:= Quantile[re,{0.025,0.975}] // N Out[15]= {8.4, 11.6333} http://rio2016.5ch.net/test/read.cgi/math/1712376048/408

409: １３２人目の素数さん [sage] 2024/04/22(月) 14:50:43.08 ID:5FMlnt/L >>408 正規分布を使うとIn[1]:= ts={9,7,8,8,12,13,10,14,13,15,19,19,16,12,7,2,2,7,3,5,9,5,8,13,15,11,13,12,9,4}; In[2]:= Quantile[NormalDistribution[Mean[ts], StandardDeviation[ts]], {0.025,0.975}] Out[2]= {0.952193, 19.0478} 区間の幅が広すぎ http://rio2016.5ch.net/test/read.cgi/math/1712376048/409

410: １３２人目の素数さん [sage] 2024/04/22(月) 15:36:38.70 ID:7c4sPJ42 「ブートストストラップなら普通の区間検定より区間狭くなって優秀なんですよ」 wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww http://rio2016.5ch.net/test/read.cgi/math/1712376048/410

411: １３２人目の素数さん [sage] 2024/04/22(月) 15:43:31.18 ID:qHll8Bu7 https://m.youtube.com/watch?v=nWjvXD4N_q8 http://rio2016.5ch.net/test/read.cgi/math/1712376048/411

412: １３２人目の素数さん [sage] 2024/04/22(月) 16:46:28.75 ID:wxnaTEMs 今日の積分 ∫[1,a] {√(1+t^2)}/t dt ただしa>1 （東大理系2013） http://rio2016.5ch.net/test/read.cgi/math/1712376048/412

413: １３２人目の素数さん [sage] 2024/04/22(月) 16:53:28.97 ID:gzdEb9v/ ■superPCM関数とは？ 奇数の数列2n-1から 合成数を取り除くアルゴリズム PCM(Product Combination Mod) によって素数を1 合成数を0に振り分ける(量子化) これはアナログをデジタルに変換する PCM(Pulse Coded Modulation)と 同じ発想 奇数の数列2n-1は乗積Πを掛けると その都度出力されてしまうので、 C(0,3-a)を使って一度だけ出力する Table[Product[(2n-1)^(C(0,3-a)) C(0,C(0,((n-a)^(2a-2)mod(2a-1)))),{a,3,30}],{n,50,232}] ◆aの範囲{a,3,30} 3は固定値

、 終値の30は最大50まで設定できる これはnの初期値 しかし、aの終値は40や50に設定しても 30の時と精度に差は生じない http://rio2016.5ch.net/test/read.cgi/math/1712376048/413

414: １３２人目の素数さん [sage] 2024/04/22(月) 17:04:47.51 ID:uE/ElGrc >>403 チンパンだから日本語やっぱり通じないみたいw http://rio2016.5ch.net/test/read.cgi/math/1712376048/414

415: １３２人目の素数さん [] 2024/04/22(月) 17:25:30.55 ID:6ORmhlLT >>412 　√(1+tt) /t = t/√(1+tt) + 1/{t√(1+tt)}, 第一項は 　∫ t/√(1+tt) dt = √(1+tt), 　u = √(1+tt)　とおくと 　du = {t/√(1+tt)}dt, より 第二項は ∫ 1/(t√(1+tt)) dt = ∫ (1/tt) {t/√(1+tt)}dt 　= ∫ 1/(uu-1) du 　= (1/2)∫ {1/(u-1)−1/(u+1)}du 　= (1/2)log(u-1) − (1/2)log(u+1) 　= (1/2)log(√(1+tt) -1) − (1/2)log(√(1+tt) +1), (与式) = √(1+tt) + (1/2)log(√(1+tt)-1) − (1/2)log(√(1+tt)+1), http:/

/rio2016.5ch.net/test/read.cgi/math/1712376048/415

416: １３２人目の素数さん [sage] 2024/04/22(月) 17:33:03.98 ID:pH+3RKg1 ^^^累乗が無意味だと気づかない馬鹿 http://rio2016.5ch.net/test/read.cgi/math/1712376048/416

417: １３２人目の素数さん [] 2024/04/22(月) 17:34:57.00 ID:6ORmhlLT >>412 (与式) = √(1+aa) + (1/2)log(√(1+aa)-1) − (1/2)log(√(1+aa)+1) 　　　　− √2 + log(1+√2), http://rio2016.5ch.net/test/read.cgi/math/1712376048/417

418: １３２人目の素数さん [sage] 2024/04/22(月) 18:34:04.54 ID:GQY5t3Jx >>410 違うよ。 標本数が少なくて正規分布が仮定できないときの有力な手段。 ゾフルーザの治験でも信頼区間算定に使われていた。 http://rio2016.5ch.net/test/read.cgi/math/1712376048/418

419: １３２人目の素数さん [sage] 2024/04/22(月) 18:35:00.18 ID:GQY5t3Jx Wolfram言語になれるためのコーディング (* △ABCの面積　*) ABC2S[A1_,B1_,C1_] := (1/2)*Abs[ Im[(A1-C1)*Conjugate[(B1-C1)] ] ] ABC2S[1,2,3+4I] ABC2S[2,3,4+5I] (* 三角形の内心と内接円半径 *) incircle[A1_,B1_,C1_] := ( ABC2S[P_,Q_,R_] := (1/2)*Abs[Im[(P-R)*Conjugate[(Q-R)]]]; a=Abs[B1-C1];b=Abs[C1-A1];c=Abs[A1-B1]; s=(a+b+c)/2;S=ABC2S[A1,B1,C1]; radius=S/s; center=(a*A1+b*B1+c*C1)/(2s); {center,radius}) incircle[1,2,3+4I] // N incircle[2,

3,4+5I] // N (* 三角形の外心と外接円半径 *) outcircle[P_,Q_,R_]:=( dot[x_,y_]:=Re[x]*Re[y]+Im[x]*Im[y]; p=Abs[Q-R];q=Abs[R-P];r=Abs[P-Q]; cosP=dot[R-P,Q-P]/(q*r);cosQ=dot[P-Q,R-Q]/(r*p);cosR=dot[Q-R,P-R]/(p*q); center=(p*cosP*P+q*cosQ*Q+r*cosR*R)/(p*cosP+q*cosQ+r*cosR); radius=Abs[center-P]; {center,radius} ) outcircle[1,2,3+4I] // N outcircle[2,3,4+5I] // N (* 三角形の垂心 *) orthocenter[P_,Q_,R_] :=( a1=Re[P] ; a2=Im[P]; b1=Re[Q] ; b2=Im[Q]; c1=Re[R] ; c2=Im[R]; o1=(a1*(a2*(b1-c1)-b1*b2+c1*c2)+(b2-c2)*(

a2^2-a2*(b2+c2)+b1*c1+b2*c2))/(a1*(c2-b2)+a2*(b1-c1)-b1*c2+b2*c1); o2=(a1^2*(b1-c1)+a1*(a2*b2-a2*c2-b1^2+c1^2)+a2*(c1*c2-b1*b2)+(b1-c1)*(b1*c1+b2*c2))/(a1*(b2-c2)+a2*(c1-b1)+b1*c2-b2*c1); o1+o2*I ) orthocenter[1,2,3+4I] // N orthocenter[2,3,4+5I] // N http://rio2016.5ch.net/test/read.cgi/math/1712376048/419

420: １３２人目の素数さん [sage] 2024/04/22(月) 18:42:30.99 ID:VHMw4BHx >>418 へぇ違うのw じゃあとりあえず上限11.633だっけww それよりでかい値で帰無仮説立てて棄却してみろやwwww アホ〜wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww http://rio2016.5ch.net/test/read.cgi/math/1712376048/420

421: １３２人目の素数さん [sage] 2024/04/22(月) 20:28:51.74 ID:gzdEb9v/ >>411 数字をピッタリ合わせる能力 http://rio2016.5ch.net/test/read.cgi/math/1712376048/421

---

ﾒﾓ帳

(0/65535文字)

---

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

---

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

---

Google検索

Wikipedia

---

ぬこの手 ぬこTOP 0.013s