2ちゃんねる ■掲示板に戻る■ 全部 1- 最新50    
レス数が1000を超えているけど、まだ書けるかも知れないよ。

底辺私立医大を卒業した医者って頭悪いよね? Part30

1 :卵の名無しさん :2024/01/16(火) 09:07:20.74 ID:3V8WwmwLH.net
タイトルまんまです
すなわち、タイトルの正しさを検証するスレです。

前スレ
底辺私立医大を卒業した医者って頭悪いよね? Part28
https://egg.5ch.net/test/read.cgi/hosp/1681861869/
底辺私立医大を卒業した医者って頭悪いよね? Part29
https://egg.5ch.net/test/read.cgi/hosp/1692956157/

親の期待に反して底辺シリツにしか進学できない子供をもつとこうなるそうです。
赤裸々な告白より引用
(quote)
恥ずかしながら実はうちの親がそうなんです
私立洗顔(ママ)でした
本人は隠したがっていたけど祖父が公言してたからね
祖父は息子(うちの父親)の学力など知らずに進路指導で当たり前に自分の出身医大(国立)を希望させ
父親の担任に無理だと断言されこれが一生で最大の屈辱だったそうです
祖父が何十年もたってるのに死ぬまで祖母をその事で叱りつけてました
お前がしっかり勉強させないからこうなったっとね
底辺私立医大を卒業した医者って頭悪いよね? Part27
https://egg.5ch.net/test/read.cgi/hosp/1673394195/

自分は教育に失敗したが祖父の口癖
これが私大医学部OBの悲しい現実
これが現実です
(unquote)

 一生で最大の屈辱
 一生で最大の屈辱    
 一生で最大の屈辱     
と表現されております。
VIPQ2_EXTDAT: checked:vvvvvv:1000:512:: EXT was configured

844 :卵の名無しさん (ワッチョイ 7f58-nRHk [14.13.16.0 [上級国民]]):2024/05/23(木) 11:09:18.57 ID:LL2Dpiwe0.net
*
問題
100cmの真っ直ぐな棒を3つに切って三角形を作ろうとしたところ
10cm,30cm,60cmに切断してしまって、これでは三角形ができないこと気付いた。
最長の60cmの棒を2つに切断して10cm,30cmの棒切れとで四角形の枠を作ることにした。
四角形の面積が最大になるように切断したい。そのときの四角形の面積を求めよ。
*)

Clear[{f,a,b,c,d,tab,tc,s}]

f[a_,b_,c_,x_] :=(
d=Sqrt[a^2+b^2 - 2 a b Cos[x]];
h=Sqrt[(c/2)^2-(d/2)^2];
tab=a b Sin[x]/2;
tc=d h /2;
tab+tc
)
Plot[f[10,30,60,x],{x,0,Pi}]
Maximize[f[10,30,60,x],x]
% // N

845 :卵の名無しさん (ワッチョイ 7f58-nRHk [14.13.16.0 [上級国民]]):2024/05/23(木) 12:28:18.09 ID:LL2Dpiwe0.net
(*
問題
100cmの真っ直ぐな棒を3つに切って三角形を作ろうとしたところ
10cm,30cm,60cmに切断してしまって、これでは三角形ができないこと気付いた。
最長の60cmの棒を2つに切断して10cm,30cmの棒切れとで四角形の枠を作ることにした。
四角形の面積が最大になるように切断したい。そのときの四角形の面積を求めよ。
*)
Clear[f,p,q,r]

p=10;
q=30;
r=60;
(* x^2/a^2 + y^2/(a^2-c^2)=1 *)

f[theta_] :=(
d=Sqrt[p^2+q^2-2 p q Cos[theta]]; (* d:焦点間距離, theta:p qのなす角 *)
c=d/2; (* 焦点 (c,0),(-c,0) *)
a=r/2; (* 2a : 焦点からの距離和 *)
b=Sqrt[a^2-c^2]; (* 縦径=三角形の最大高 *)
d b/2 + p q Sin[theta]/2
)

Plot[f[theta],{theta,0,Pi}]
max=Maximize[f[theta],theta]
% // N
max[[2]]*180/Pi //N

Clear[_]

846 :卵の名無しさん (ワッチョイ ebb3-Vcku [240b:253:1000:dd10:* [上級国民]]):2024/05/23(木) 15:08:27.55 ID:nMFechUv0.net
(*
問題
100cmの真っ直ぐな棒を3つに切って三角形を作ろうとしたところ
10cm,30cm,60cmに切断してしまって、これでは三角形ができないこと気付いた。
最長の60cmの棒を2つに切断して10cm,30cmの棒切れとで四角形の枠を作ることにした。
四角形の面積が最大になるように切断したい。そのときの四角形の面積を求めよ。
*)

p=10;
q=30;
r=60;
(* x^2/a^2 + y^2/(a^2-c^2)=1 *)

f[theta_] :=(
d=Sqrt[p^2+q^2-2 p q Cos[theta]]; (* d:焦点間距離, theta:p qのなす角 *)
c=d/2; (* 焦点 (c,0),(-c,0) *)
a=r/2; (* 2a : 焦点からの距離和 *)
b=Sqrt[a^2-c^2]; (* 縦径=三角形の最大高 *)
d b/2 + p q Sin[theta]/2
)

Plot[f[theta],{theta,0,Pi}];
m=Maximize[f[theta],theta];
% // N;
t0=2 ArcTan[Sqrt[2]];
d0=Sqrt[p^2+q^2-2 p q Cos[t0]];
c0=d0/2;
a0=r/2;
b0=Sqrt[a0^2-c0^2];
i=ResourceFunction["CircleIntersection"][Circle[{-c0, 0}, 10], Circle[{c0, 0}, 30]][[1]][[2]];
b1={0,b0};
c1={-c0,0};
c2={ c0,0};
g1=Graphics[{Dotted,Circle[{0, 0}, {a0, b0}]},Axes -> True];
g2=Graphics[Point[b1]];
g3=Graphics[{Thin,Red,Dashed,Circle[{-c0,0},{10,10}]}];
g4=Graphics[{Thin,Blue,Dashed,Circle[{c0,0}, {30,30}]}];
g5=Graphics[Point[c1]];
g6=Graphics[Point[c2]];
g7=Graphics[{ Thick,Line[{c1,i}] }];
g8=Graphics[{ Thick,Line[{c2,i}] }];
g9=Graphics[{ Thick,Line[{c1,b1}] }];
g10=Graphics[{ Thick,Line[{c2,b1}] }];
Show[g1,g2,g3,g4,g5,g6,g7,g8,g9,g10]

847 :卵の名無しさん (ワッチョイ 9742-r1ry [2400:2200:491:7f2:*]):2024/05/23(木) 17:05:38.99 ID:LN7y/1kN0.net
湘南鎌倉総合病院には元旭川医科大学勤務で国立大の弘前大学卒の元AV女優浅丘りなこと田中茉里子(旧姓古郡)がいるもんね
https://www.skgh.jp/department/hbps/
https://www.suruga-ya.jp/product/detail/131150111
http://www.oma-aozora.jp/ikizama/kisamai/welcome_02.html

848 : 警備員[Lv.5][新芽] (ワッチョイ 1377-zKIf [2001:268:922f:a563:*]):2024/05/23(木) 17:40:41.69 ID:xXCsacxW0.net
>>846
板名も読めない認知症みたいだね

849 :卵の名無しさん (ワッチョイ 47f6-Vcku [2001:ac8:40:6000:* [上級国民]]):2024/05/24(金) 04:55:18.55 ID:KvzwQkmq0.net
底辺私立医大を卒業した医者って頭悪いよね?
なので、底辺私立医大卒はWolfram言語を使えないのが判明している。

850 :卵の名無しさん (ワッチョイ 7f58-Vcku [14.13.16.0 [上級国民]]):2024/05/24(金) 05:48:15.32 ID:tvMs1ymz0.net
全長1mの真っ直ぐな棒を無作為にn分割してその棒切れをn辺とするn角形を作ろうとしたところn角形ができなかった。
最も長い棒を適当に2分割してn+1個の棒切れにすればそれらの棒切れを辺とするn+1角形をつくることは常に可能か?

IsPolygon[x_] := Total[x]/2 > Sort[x][[-1]];
f[n_] :=(
x=RandomReal[{0,1},n];
While[IsPolygon[x],x=RandomReal[{0,1},n]];
x=Sort[x];
{x[[1;;n-1]],x[[-1]]/2,x[[-1]]}/2 // Flatten // IsPolygon // Boole
)
Table[f[7],1*^4] // Mean

851 :卵の名無しさん :2024/05/24(金) 06:21:36.06 ID:tvMs1ymz0.net
全長1mの真っ直ぐな棒を無作為に切断して4つに分ける。
この4つの棒切れを4辺とする四角形を面積が面積が最大になるように配置して面積を計算する
(例:25cmの棒切が4個の場合、正方形に配置して面積計算する)
当然、四角形ができない場合もある。
(1) 四角形ができる確率を求めよ。
(2)四角形ができない場合(例:5cm 10cm,15cm 70cmに切断された場合)は面積は0として計算して
面積の平均値を求めよ。
(3) 四角形ができない場合は除外して面積0以上の四角形の面積の平均値を求めよ。

(* Sqrt[(s-a)(s-b)(s-c)(s-d)- a b c d Cos[(A+C)/2]^2 ] *)
f1[] :=(
a=RandomReal[{0,1}];
b=RandomReal[{0,1-a}];
c=RandomReal[{0,1-a-b}];
d=1-a-b-c;
{a,b,c,d}=Sort[{a,b,c,d}];
s=(a+b+c+d)/2;
If[s>d,Sqrt[(s-a)(s-b)(s-c)(s-d)],0]
)
s1=Table[f1[],1*^6];
Mean[s1]
Mean@Table[Boole[x>0],{x,s1}] // N
Histogram[s1]

852 :卵の名無しさん :2024/05/24(金) 06:52:58.53 ID:r7g4zcnN0.net
湘南鎌倉総合病院には元旭川医科大学勤務で国立大の弘前大学卒の元AV女優浅丘りなこと田中茉里子(旧姓古郡)がいるもんね
https://www.skgh.jp/department/hbps/
https://www.suruga-ya.jp/product/detail/131150111
http://www.oma-aozora.jp/ikizama/kisamai/welcome_02.html

853 ::2024/05/24(金) 08:17:24.89 ID:0U7pACD/0.net
>>849
アンタスレタイはおろか板名すら読めない認知症じゃん
高校生にもボコられてるしw

854 :卵の名無しさん :2024/05/24(金) 11:06:25.97 ID:jEQTPgGR0.net
ゼニの偏差値だけは異常に高い
卒業すれば🐴🦌患者から回収するのみ💦

855 :卵の名無しさん :2024/05/24(金) 20:39:26.45 ID:WJoZ1xqS0.net
誰も名誉毀損しない方が良かった
私立医のバカ研修医のせいだ

856 ::2024/05/24(金) 21:10:51.61 ID:0U7pACD/0.net
尿瓶ジジイ数学板の高校生にすら脳内学歴バレバレらしい

857 :卵の名無しさん:2024/05/25(土) 21:08:20.55 ID:z7Tvtid7V
医者って職業は、他の職業と大きく違う点がある。

医師の技量によって、助かる命が奪われたり
健常者がカワタにされたりする事がある。

これは患者本人にとっては、非常に重大なことだ。
これに異論は無いと認識してる。

無論、人によっては他人の生き死にとか一生とか
全く意に介さない奴もいる。

だから、患者に繰り返し毒を盛って多数の人を
コロすような看護婦も存在してしまう(大口病院事件)。

逆に、治療結果に非常な不満を抱き、被害妄想で狂い
世話になった医師を家に呼びつけて散弾銃で射殺する
ような奴も存在する(渡辺医師射殺事件)。

医者なんて止めちまえよ。

知能指数が高く、学歴もあるなら
IT産業に転身しなよ。

その能力によっては、医師のそれを遥かに
しのぐ年収を得る。

858 :卵の名無しさん (ワッチョイ dbc7-YmzF [124.47.76.122]):2024/05/26(日) 11:32:39.05 ID:QO7JsAPH0.net
u=2024%/%c(12,15,20)+1; u
f=\(n){
s=12*n[1]+15*n[2]+20*n[3]
2024<=s & s<=2040
}
gr=expand.grid(0:u[1],0:u[2],0:u[3])
pm=gr[apply(gr,1,f),]
re=rowSums(pm)

859 :卵の名無しさん :2024/05/26(日) 13:12:35.42 ID:QO7JsAPH0.net
n = {3*4,3*5,4*5};
{p1,p2,p3} = n/Total[n];
{u1,u2,u3} = Floor[2024/n]+1;
f[x_] := Total[x*n];
v = Flatten@Table[{x,y,z},{x,Range[0,u1]},{y,Range[0,u2]},{z,Range[0,u3]} ];
m = Partition[v,3];
y = Select[m,2024<=f[#] && f[#]<=2040&];
fp[x_] := (
n=Total[x];
{x1,x2,x3}={x[[1]],x[[2]],x[[3]]};
Binomial[n,x1]p1^x1 * Binomial[n-x1,x2]p2^x2 * p3^x3
)
p = fp /@ y;
pdf = p/Total[p];
x = Total /@ y;
Total[x pdf]

860 :卵の名無しさん :2024/05/26(日) 13:21:51.32 ID:TYEZEMu50.net
湘南鎌倉総合病院には元旭川医科大学勤務で国立大の弘前大学卒の元AV女優浅丘りなこと田中茉里子(旧姓古郡)がいるもんね
https://www.skgh.jp/department/hbps/
https://www.suruga-ya.jp/product/detail/131150111
http://www.oma-aozora.jp/ikizama/kisamai/welcome_02.html

861 :卵の名無しさん :2024/05/26(日) 13:24:45.26 ID:QO7JsAPH0.net
Wolfram Language 14.0.0 Engine for Microsoft Windows (64-bit)
Copyright 1988-2023 Wolfram Research, Inc.

In[1]:= f[] := (For[sum=0;count=0, sum<2024, count++, sum+=RandomChoice[{12,15,20}->{12,15,20}]]; count)

In[2]:= n=Table[f[],10^6];

In[3]:= Mean[n] // N

Out[3]= 124.192

In[4]:= Quantile[n,{0.025,0.5,0.975}]

Out[4]= {120, 124, 129}

In[5]:= (* Histogram[n] *)

862 :卵の名無しさん :2024/05/26(日) 13:25:59.77 ID:QO7JsAPH0.net
In[7]:= n = {3*4,3*5,4*5};
In[8]:= {p1,p2,p3} = n/Total[n];
In[9]:= {u1,u2,u3} = Floor[2024/n]+1;
In[10]:= f[x_] := Total[x*n];
In[11]:= v = Flatten@Table[{x,y,z},{x,Range[0,u1]},{y,Range[0,u2]},{z,Range[0,u3]} ];
In[12]:= m = Partition[v,3];
In[13]:= y = Select[m,2024<=f[#] && f[#]<=2040&];
In[14]:= fp[x_] := (
n=Total[x];
{x1,x2,x3}={x[[1]],x[[2]],x[[3]]};
Binomial[n,x1]p1^x1 * Binomial[n-x1,x2]p2^x2 * p3^x3
)
In[15]:= p = fp /@ y;
In[16]:= pdf = p/Total[p];
In[17]:= x = Total /@ y;
In[18]:= Total[x pdf]
Out[18]= 495904886863024711014690900126037925947158151253955867691586858290118663480916940260788181\
> 604372384668673161160077913476388924610009381666181965328404540822774723934597627786022595480\
> 781720140588331207803909691382542301305760276287633967192246724712364034709143616564290023136\
> 791036653 / 399170493235018654399908642063415913011369141571001467137214805437161337290039906\
> 913196588800673241916796559715750891456576910871356692132890930902737404771635711223541077460\
> 954262289340296694519847364433075952126678819758516908619463844482254836343353585090173449556\
> 8610202700178827

In[19]:= % // N
Out[19]= 124.234

In[20]:=

863 :卵の名無しさん :2024/05/26(日) 13:27:00.39 ID:QO7JsAPH0.net
分数解とシミュレーション解はほぼ一致。

864 :卵の名無しさん :2024/05/26(日) 13:29:20.59 ID:TYEZEMu50.net
湘南鎌倉総合病院には元旭川医科大学勤務で国立大の弘前大学卒の元AV女優浅丘りなこと田中茉里子(旧姓古郡)がいるもんね
https://www.skgh.jp/department/hbps/
https://www.suruga-ya.jp/product/detail/131150111
http://www.oma-aozora.jp/ikizama/kisamai/welcome_02.html

865 :卵の名無しさん :2024/05/26(日) 16:10:11.36 ID:QO7JsAPH0.net
In[1]:= n = {12,15,20};
In[2]:= {p1,p2,p3} = n/Total[n];
In[3]:= {u1,u2,u3} = Floor[2024/n];
In[4]:= f[x_] := Total[x*n];
In[5]:= v = Flatten@Table[{x,y,z},{x,Range[0,u1]},{y,Range[0,u2]},{z,Range[0,u3]} ];
In[6]:= m = Partition[v,3];
In[7]:= y12 = Select[m,(2024-12)<=f[#] && f[#]<2024&];
In[8]:= y15 = Select[m,(2024-15)<=f[#] && f[#]<2024&];
In[9]:= y20 = Select[m,(2024-20)<=f[#] && f[#]<2024&];
In[10]:= fp[x_] := (
n=Total[x];
{x1,x2,x3}={x[[1]],x[[2]],x[[3]]};
Binomial[n,x1]p1^x1 * Binomial[n-x1,x2]p2^x2 * p3^x3
)
In[11]:= p12 = p1*fp /@ y12;
In[12]:= p15 = p2*fp /@ y15;
In[13]:= p20 = p3*fp /@ y20;
In[14]:= AUC=Total[p12]+Total[p15]+Total[p20];
In[15]:= pdf12 = p12/AUC;
In[16]:= pdf15 = p15/AUC;
In[17]:= pdf20 = p20/AUC;
In[18]:= x12 = 1 + Total /@ y12;
In[19]:= x15 = 1 + Total /@ y15;
In[20]:= x20 = 1 + Total /@ y20;
In[21]:= Total[x12 pdf12]+ Total[x15 pdf15]+Total[x20 pdf20]

866 : 警備員[Lv.4][新芽] (ワッチョイ 977d-AvcR [2001:268:922f:d58:*]):2024/05/27(月) 00:03:59.92 ID:k0XPVHZ30.net
また認知症悪化してるのか

867 :卵の名無しさん (ワッチョイ dbc7-YmzF [124.47.76.122]):2024/05/27(月) 04:19:00.14 ID:akziHR3h0.net
https://mathematica.stackexchange.com/questions/186841/how-to-generate-a-value-frequency-table-with-random-numbers

868 :卵の名無しさん (ワッチョイ dbc7-fXFG [124.47.76.122 [上級国民]]):2024/05/27(月) 04:40:45.58 ID:akziHR3h0.net
先頭項目でグループ化し,対応する最終項目の平均を計算する:
In[1]:=
GroupBy[{{a, x}, {b, v}, {a, y}, {a, z}, {b, w}}, First -> Last, Mean]
https://wolfram.com/xid/0cqz8kh5-xq12c4
Out[1]=

869 :卵の名無しさん (ワッチョイ dbc7-fXFG [124.47.76.122 [上級国民]]):2024/05/27(月) 05:10:26.02 ID:akziHR3h0.net
先頭項目でグループ化し,対応する最終項目の平均を計算する:
In[1]:=
GroupBy[{{a, x}, {b, v}, {a, y}, {a, z}, {b, w}}, First -> Last, Mean]
https://wolfram.com/xid/0cqz8kh5-xq12c4
Out[1]=

870 :卵の名無しさん :2024/05/27(月) 06:48:30.52 ID:akziHR3h0.net
分数表示したくてWolfram言語で書いているが、Rのtapply関数に相当する関数はGroupByであった。

871 :卵の名無しさん :2024/05/27(月) 06:50:06.87 ID:akziHR3h0.net
n = {12,15,20};
{p1,p2,p3} = n/Total[n];
{u1,u2,u3} = Floor[2024/n];
f[x_] := Total[x*n];
v = Flatten@Table[{x,y,z},{x,Range[0,u1]},{y,Range[0,u2]},{z,Range[0,u3]} ];
m = Partition[v,3];
y12 = Select[m,(2024-12)<=f[#] && f[#]<2024&];
y15 = Select[m,(2024-15)<=f[#] && f[#]<2024&];
y20 = Select[m,(2024-20)<=f[#] && f[#]<2024&];
fp[x_] := (
n=Total[x];
{x1,x2,x3}={x[[1]],x[[2]],x[[3]]};
Binomial[n,x1]p1^x1 * Binomial[n-x1,x2]p2^x2 * p3^x3
)
p12 = p1*fp /@ y12;
p15 = p2*fp /@ y15;
p20 = p3*fp /@ y20;
AUC=Total[p12]+Total[p15]+Total[p20];
pdf12 = p12/AUC;
pdf15 = p15/AUC;
pdf20 = p20/AUC;
x12 = 1 + Total /@ y12;
x15 = 1 + Total /@ y15;
x20 = 1 + Total /@ y20;
Total[x12 pdf12]+ Total[x15 pdf15]+Total[x20 pdf20];
N[%,10]

872 :卵の名無しさん :2024/05/27(月) 06:53:09.54 ID:akziHR3h0.net
x=Flatten[{x12,x15,x20}];
Tally[x];
Histogram[x];
p=Flatten[{p12,p15,p20}];
xp=Transpose[Table[{x,p}]];;
pmf=GroupBy[xp,First->Last,Total;
ListPlot[pmf]
BarChart[pmf,ChartLabels->{Placed[Keys[pmf],Top]}]
Keys[pmf]
pmf[124]
% // N

徐々にWolframの書式に慣れてきた。

873 :卵の名無しさん :2024/05/27(月) 07:55:15.79 ID:PKj/VdlK0.net
湘南鎌倉総合病院には元旭川医科大学勤務で国立大の弘前大学卒の元AV女優浅丘りなこと田中茉里子(旧姓古郡)がいるもんね
https://www.skgh.jp/department/hbps/
https://www.suruga-ya.jp/product/detail/131150111
http://www.oma-aozora.jp/ikizama/kisamai/welcome_02.html

874 :卵の名無しさん :2024/05/27(月) 11:02:03.46 ID:Rg1JEAAsM.net
今日は内視鏡件数が少なかったので実働2時間だった。
まあ、来月から市町村健診が始まるから予約枠は全枠埋まるだろうなぁ。

875 :卵の名無しさん:2024/05/27(月) 18:38:23.13 ID:0KwBLVZDl
内視鏡検査データを採取するのは、レントゲン撮影みたいに
専門の検査技師(若い女性)にまかせて、偉い先生はだねえ
データをまず専用の解析AIシステムに投げて、そこからの
解析レポートを精査するスタイルで作業効率を上げることだわ。

で、さらにAIと対話しながら解析の精密度を上げていくのが
今後の医療スタイルになるね。

876 :卵の名無しさん :2024/05/28(火) 18:54:23.32 ID:QlD/HeIz0.net
fp[a_,b_,c_] :=(
R=Sqrt[a^2+b^2+c^2];
rab=Sqrt[a^2+b^2];
hab=R-Sqrt[R^2-rab^2];
rbc=Sqrt[b^2+c^2];
hbc=R-Sqrt[R^2-rbc^2];
rca=Sqrt[c^2+a^2];
hca=R-Sqrt[R^2-rca^2];
pab=hab/(hab+hbc+hca);
pbc=hbc/(hab+hbc+hca);
pca=hca/(hab+hbc+hca);
{pab,pbc,pca}
)

p=Flatten[Table[fp[a,b,c],2]]/2;
s=Drop[Subsets[Range[6]],1];
f1[x_] := (-1)^(Length[x]-1)/Total[p[[#]] & /@ x]
ans=Simplify[Total[f1 /@ s]]

877 ::2024/05/30(木) 19:05:12.34 ID:yJ734KYJ0.net
医者板はおろか数学板でいくら発狂しても相手にされないね

878 :卵の名無しさん :2024/05/31(金) 05:37:42.59 ID:aPnJQqQ30.net
Wolfram Language 14.0.0 Engine for Microsoft Windows (64-bit)
Copyright 1988-2023 Wolfram Research, Inc.

In[1]:= k=10^8;

In[2]:= pH=RandomVariate[BetaDistribution[1+400,1],k];

In[3]:= pB=RandomVariate[BetaDistribution[1+240,1+27],{k}];

In[4]:= Mean@Boole[#>0& /@ (pB-pH)]

Out[4]= 0

879 :卵の名無しさん :2024/05/31(金) 05:40:41.96 ID:U7Vlyaxm0.net
beta.diff=
function(r1,r2,n1,n2,a=1,b=1){
f <- function(x,y) dbeta(x+y,a+r1,b+n1-r1)*dbeta(y,a+r2,b+n2-r2)
vf=Vectorize(f,vectorize.args = 'y')
pdf <- function(x) integrate(function(y) vf(x,y),-1,1)$value
pdf=Vectorize(pdf)
cdf=function(x) integrate(pdf,-1,x)$value
cdf=Vectorize(cdf)
invisible(list(pdf=pdf,cdf=cdf))
}
re=beta.diff(240,400,240+27,400,1,1)
curve(re$pdf(x),-1,1)
integrate(\(x) x*re$pdf(x),0,1,rel.tol = 1e-24)
re$cdf(0)

880 :卵の名無しさん :2024/05/31(金) 06:10:52.73 ID:U7Vlyaxm0.net
問題 : 400戦無敗のヒクソン・グレイシーに240勝24敗のブアカーオが勝利する確率を求めよ。


両選手の勝利確率の事前分布を一様分布に設定してβ分布に従う乱数で1億回シミュレーションしてもブアカーオ勝利は0回であった。
Wolframを使って分数解を算出。

a=1;
b=1;
r1=400;
r2=240;
n1=400;
n2=240+27;
f[x_,y_] := PDF[BetaDistribution[a+r1,b+n1-r1],x+y] PDF[BetaDistribution[a+r2,b+n2-r2],y] ;
pdf[x_] := Integrate[f[x,y],{y,-1,1}];
Integrate[pdf[x],{x,-1,0}]

881 :卵の名無しさん :2024/05/31(金) 06:51:39.50 ID:JEiAexHA0.net
湘南鎌倉総合病院には元旭川医科大学勤務で国立大の弘前大学卒の元AV女優浅丘りなこと田中茉里子(旧姓古郡)がいるもんね
https://www.skgh.jp/department/hbps/
https://www.suruga-ya.jp/product/detail/131150111
http://www.oma-aozora.jp/ikizama/kisamai/welcome_02.html

882 ::2024/05/31(金) 06:59:45.84 ID:0ZDViJXq0.net
>>613
数学板にもマルチしてレス乞食とかつくづく哀れ
東大卒業生やエリート高校生がアンタみたいな日本語通じないチンパン相手にするわけないだろw

883 :卵の名無しさん (ワッチョイ 53fb-IQ+a [240a:61:5196:98c4:*]):2024/06/03(月) 07:39:28.89 ID:Wwe4EXxi0.net
尿瓶ジジイ最近大人しいじゃん
脳内医療をつぶやかなくなったし
自分は医者じゃなくてただの医療事務って気づいたのか?
プログラミング言語、医療事務なら必要だよなwwwだから頑張って練習してるんだろ?

884 : 警備員[Lv.3][新芽] (ワッチョイ 7f0b-Uf6x [2001:268:9234:d0ef:*]):2024/06/03(月) 07:55:20.69 ID:WzbqPEqJ0.net
https://rio2016.5ch.net/test/read.cgi/math/1715164435/

最近では誰にも相手にされないのでレス乞食と自演にご執心

自演認定厨などと予防線を張るも語るに落ちるw

885 :卵の名無しさん:2024/06/03(月) 16:06:51.87 ID:frR3kiZvv
お決まりのデータ分析処理なんかは
データファイルを用意して、日本語で
指示文を与えるだけで、分析レポートや
関連グラフが文書の形で返って来る時代だよん。

例えば会社の決算書を出せとかね。
これは経理データを与えれば、誰が
やってもほぼ同じ。しかもほぼ数分で
終わる。

会計士がやるのは、個々の会社の事業情勢に
応じた分析レポートを書き加えるだけ。

プログラミング言語を駆使するのは
専門学者が新しい理論に基づく数値解析処理を
行う場合だけだね。それも特殊な部分的な処理だけな。

臨床医はやらんな。

886 : 警備員[Lv.24] (ワッチョイ cf6e-8DHQ [153.242.16.144]):2024/06/04(火) 02:21:33.15 ID:23liO8qz0.net
そう

887 ::2024/06/04(火) 16:48:26.63 ID:yILR1j/AH.net
尿瓶ジジイ高校生相手に自演を繰り返すも同じIDでなるほどですねなどと書き込んで自演が誰の目からも明らかになりダンマリを決め込むw

888 :卵の名無しさん :2024/06/04(火) 17:17:24.49 ID:V4c3AZTY0.net
湘南鎌倉総合病院には元旭川医科大学勤務で国立大の弘前大学卒の元AV女優浅丘りなこと田中茉里子(旧姓古郡)がいるもんね
https://www.skgh.jp/department/hbps/
https://www.suruga-ya.jp/product/detail/131150111
http://www.oma-aozora.jp/ikizama/kisamai/welcome_02.html

889 :卵の名無しさん :2024/06/06(木) 04:34:28.61 ID:jVzJzDfs0.net
3浪日大卒研修医ですが確かに勉強できませんわ
体力気力しかない
研修医3ヶ月目にして医師としての適性を疑い始めてる

890 :卵の名無しさん :2024/06/06(木) 06:38:26.64 ID:KmxFroPZH.net
>>889
医者は体力気力あるのが才能だよ
勉強なんぞ出来なくても休まず仕事に来て
みんなとコミニケーション取れる奴が優秀

後こんな糞スレにはもう来ないほうが良い

891 :まんこー誠まこしけーパン屋横須賀公郷町誠まましけーしけー:2024/06/08(土) 04:52:54.40
工藤静香こえこえースレッド?どおわーしけーこあっこかー?
区度ぷーー工藤静香こえこえーしょP−ふー

いけーだんー韓国?えろしけー電線管支持材木材開発しけーおわおわー
媚びるよー?くごーこかー?べいんーよーこすかー米穀?よーPじょーかいこーしけーの
ころしーおわおわー?よーPじょー買春べいんーよーこすかー米穀?いでぃおーこえこぺーんーーえたよーじょーいこーいちご宇多田ヒカルべいん−こえこえーしっけーしょーふもしけーおわS
韓国?えろKしけーだけー死んだ?えへーーよーしけーしけーーいでぉおーっとーおーSかあーかー国中黒人?工藤静香こえこえー?
Jはくじん−のこかいん−こかこかー?はくじんーのこかーあだちどおわーみせどおわーがいこーくいおいおー?
はくじんーのこかーあだちどおわーみけーなみこえーしけーしけーぶすよーこいすおわおWしけーー
いでぉおーとーソーリーページいちこしけー?市川市歌舞伎町笑いおわおわーしねしね
こかー松本幸四郎こかいん−韓国?じみけー自民党えろこー夫ださいーお金儲けこかこかー妻島しけーおわおわー?
日本あほけーどもしけーこーじゅーおわおわしけーしけー0?工藤静香こ

892 :まんこー誠まこしけーパン屋横須賀公郷町誠まましけーしけー:2024/06/08(土) 05:08:47.71
工藤静香こえこえースレッド?どおわーしけーこあっこかー?
区度ぷーー工藤静香こえこえーしょP−ふー佐越家しけーこんにゃくオーナナー二ーーヘンタおい?
工藤静香こえこえーしけーおわおわーえたよーみんなーしけーおわーころせー家族、もしけーおわおわー松原哲生蒟蒻のー授業?銃御意?重度おわー?おわおわー
工藤静香こえこえーしけーおわおわーこかいん−よしみーころせーよしみーころせーみんなーしけーおわーころせーよしみこかーしけー
八木さんち葉山?八木さんち葉山?山崎こかいんーまじころしー言いにくい?工藤静香こえこえーしけーおわおわー珍0歩声こここーしけー
ぽこたYんーおわおわー医務室おわー井村屋製菓おわおわー工藤静香こえこえーパンパンひひぴんおめー覚醒剤
みんなーしけーおわーころせーじみえK−おわ自滅いおいおー?オワくぉわおわおわーオラクルカード中華オワ駒井?
おわおWくーー玲子千葉よがせれぶあほけんちーなみこか−JIDO−じどーしぬおかNE−4八木さんち葉山?言いにくいはくちよめもきれゆーこーもしけーしけーー
八木さんち葉山?言いにくい?家庭特異よやくざーでMねーーきちがいこかいんーでもばかすけー工藤静香こえこえーしけーおわおわ工藤静香いうだKEYO−けでどおわー孫帰るおわおわー
しえーおわおわしけー原恵美最低の佐野町山下小屋の隣だったくずくずじけーんーどおわーのこりけーよーじょー80年おわおわしけーおわー^?
71ねんころーーだ原恵美きゅせー原恵美じうどー売春ーきゅーしゅーごみこかいんー佐野町山下小屋ふかいーかおーおわおわー・しょーふこやーばかうんこー歌舞伎町笑い市川しけー0おわーみんなーしけーおわーころせー
歌舞伎町笑い松本幸四郎こあっこかー?こかいんーのくず笑顔園児のくずしけーおわおわーのあほけーものー告知高野貴子しけーおわおわー?

べいん−そーりーいでぉおーそーりーこえこえーはくじんーのこかーあだちどおわーこかこかー
入江先生たぬきこえーせくすーよーじょーまんこしけー外人イデオロギ

893 :まんこー誠まこしけーパン屋横須賀公郷町誠まましけーしけー:2024/06/08(土) 05:11:00.98
工藤静香こえこえースレッド?どおわーしけーこあっこかー?
区度ぷーー工藤静香こえこえーしょP−ふー佐越家しけーこんにゃくオ?
みんなーしけーおわーころせーお金儲けわかいーおわしけーーずるいはくちごみけー横須賀ー近野淳平なみこかーこかー
秀夫なみこかしけー0しけー七儒年だおわおWく?_NANAJYUNANN?七儒年代おわおわしけーおわー^?
七ジュークーおわおわービョーク外人はくじんーのこかーあだちどおわー奈美悦子しけーおわー葉山民衆じみけー自民党・民主党こかこかー山本五十六?おわおわーころせー
志保名みけーなーくずーー?
やくざーー
顧みこかこかー?こかいんーおめー殺し梅雨ちゅゆかーーちゅうかーのこえー笑福亭歌舞伎まこしけーおわおわー沖縄
けらけらーしけー歌舞伎町笑い松本幸四郎しけー樹おわおわーころせーたかこー市川ぞくえーこかいんーしけーおわおわーころせーおわー

894 :まんこー誠まこしけーパン屋横須賀公郷町誠まましけーしけー:2024/06/08(土) 05:12:01.60
工藤静香こえこえースレッド?どおわーしけーこあっこかー?
区度ぷーー工藤静香こえこえーしょP−ふー佐越家しけーこんにゃくオ?
みんなーしけーおわーころせーお金儲けわかいーおわしけーーずるいはくちごみけー横須賀ー近野淳平なみこかーこかー
秀夫なみこかしけー0しけー七儒年だおわおWく?_NANAJYUNANN?七ごごーしけー木村拓哉こじゅーきーこかー?_
質屋しこーしけーでもばかうんこよーじょーけーものけーーでーー須高おわおわーころせー
しこーいおわおわーしこーおわおWく久里浜クリームシチュー上田歌手おわおわーころせー
クリームシチュー有田やりまん−しけーおわー

895 :まんこー誠まこしけーパン屋横須賀公郷町誠まましけーしけー:2024/06/08(土) 05:13:07.97
工藤静香こえこえースレッド?どおわーしけーこあっこかー?
区度ぷーー工藤静香こえこえーしょP−ふー佐越家しけーこんにゃくオ?
みんなーしけーおわーころせーお金儲けわかいーおわしけーーずるいどおわs−でどおわーおわー韓国前田
本田啓子異常姉妹石立町?クリームシチュー蒟蒻いおいおー?ないよねーー?
工藤静香めWりこー?韓国?横須賀ーえろこしけーしけー鏡うやくしけーおわおわー
こわいーの?クルクルリサイクルおよよー逗子高野きけーおわおわーぎかいーおかまーしけーしけーおわー高野

896 :まんこー誠まこしけーパン屋横須賀公郷町誠まましけーしけー:2024/06/08(土) 05:19:55.08
工藤静香こえこえースレッド?どおわーしけーこあっこかー?
区度ぷーー工藤静香こえこえーしょP−ふー佐越家しけーこんにゃく哀川翔おわおわー青木しけーをあおわー
赤山赤山?あいっかわななせーどおわーよーじょー妹紅?儲けもこきわーしけW−0しけーー期間従業員授業こあっこかー?
あいっかわななせーどおわーよーじょー哀川翔おわおわー青しけーおわーちんきーよしえーおわおわーしけーしけーー

お金おかまーしけーしけーおわー相川七瀬歌手おわおわーしけー^−しけーしけーーおわおわー
やれよーくずよーおわおわー葉山大好きな?
近藤大介馬鹿近野オワ嫉妬?近藤大介馬鹿近野オワ嫉妬?近藤あほこめよこっすかーぼーりぃーくだんーおわおわーどおわーねー?
近藤おわおわーころせー近野淳平オワ空手べいん−いでぃおーこえこぺーんーよこけーらしけーおわおわー空手道しけーしけーおわおわーやれえきれよーやえこー民主党みんなおわおわー
しけーおわー^やりまん−しけーおわー和枝伊藤かずえおわおわー青木もいSけーしけーおわおわーサッカーおわおわーおわおわー^おいとP−くん−おわおわーカトー孤児おわおわーころせー?
加藤浩次えたよー岡村漫才やりまん−しけーおわーおーさかこーきこーろしーころしーこえー?
岡村漫才オ?おかまーしけーしけーおわーやれよじゃ0ひこここーひよ韓国?えろこしけーやくざー日本殺せないおわおわー青木しけー智澄おわーなのにK−0_
美容室韓国?終わるんだー?みんなおわおわーしけーみんなーくず民主会議室おわおわー青木しけーおわおわーしけーかおりーあだちぃもよこすかー青木智澄貧困山かじょーきん−くずくずしえーしけー
八木さんち葉山もしけーおわー^原由実ゆーこーしっけーおわおわーしけーーおわおわー

897 :まんこー誠まこしけーパン屋横須賀公郷町誠まましけーしけー:2024/06/08(土) 05:20:29.81
工藤静香こえこえースレッド?どおわーしけーこあっこかー?
区度ぷーー工藤静香相川七瀬こえこえーしょP−ふー佐越家しけーこんにゃくななえどおわーよーじょーはくちー歌手おわおわーしけー^−

898 :まんこー誠まこしけーパン屋横須賀公郷町誠まましけーしけー:2024/06/08(土) 05:22:28.02
工藤静香こえこえースレッド?どおわーしけーこあっこかー?
区度ぷーー工藤静香相川七瀬こえこえーしょP−ふー佐越家しけーこんにPPPかこころしーかかかかK−−
係長牧瀬里穂カジューシースまんKぽーあなるこかこかーけっけけK−?医薬品の・開発環境?めこしけーおわおわー
会社員康子横須賀米んーーオワオワしーえむこかこかー男乙葉のしけーおわおわQ−しえKんーおわおわ?しこーおわおわー?
おかまーじこーしけーおわーこえこえー藤井フミヤオワ曾和専属のーちんーおわこえこえー藤井一子?変態まききー・
巻き込まれサイババ覚醒剤オワおをわー死刑青木サイババ覚醒剤オワ青木最低のくずよーちーけころしけーこけここー
のかわーあかよこすかー産業よあっかーさかいーしけーおわおわー智澄しこーおわおわー?
ゃくななえどおわーよーじょーはくちー歌手おわおわーしけー^−

899 :まんこー誠まこしけーパン屋横須賀公郷町誠まましけーしけー:2024/06/08(土) 05:23:30.08
工藤静香こえこえースレッド?どおわーしけーこあっこかー?
区度ぷーー工藤静香相川七瀬こえこえーしょP−ふー佐越家しけーこんにPPPかこころしーかかかかK−−
係長牧瀬里穂カジューシースまんKぽーあなるこかこかーけっけけK−?医薬品の・開発環境?めこしけーおわおわー
会社員康子横須賀米んーーオワオワしーえむこかこかー男乙葉のしけーおわのけものーおわおわーー相川七瀬?_哀川翔よーしけーSけーーこーしけW−しけー
哀川翔おわおわー青おわおわおかまーなみのくずちんぴらーのくずよーじょー派遣社員こかこかー?
哀川翔おわおわー青ーー相川七瀬歌集くずよどおWさーなみきーおわおわーのこえーしけー?はくちー歌手おわおわーしけー^−

900 :まんこー誠まこしけーパン屋横須賀公郷町誠まましけーしけー:2024/06/08(土) 05:24:37.29
工藤静香こえこえースレッド?どおわーしけーこあっこかー?ドラマめかねーもしけー再婚相手くずよどおあS−かんこくー^韓国?あかよねーー?
ドラマめかねーもしけーしえーしけーショー君おわおわー櫻井翔あほけーものーしけーしけーーおわおわー
くずけー逗子箱しけーしょーふこやーばかうんこー櫻井翔もおかまーしけーしけーおかまー桜田淳子しけーしけーーおわおわー
やれ
区度ぷーー工藤静香相川七瀬こえこえーしょP−ふー佐越家しけーこんにPPPかこころしーかかかかK−−
係長牧瀬里穂カジューシースまんKぽーあなるこかこかーけっけけK−?医薬品の・開発環境?めこしけーおわおわー
会社員康子横須賀米んーーオワオワしーえむこかこかー男乙葉のしけーおわのけものーおわおわーー相川七瀬?_哀川翔よーしけーSけーーこーしけW−しけー
哀川翔おわおわー青おわおわおかまーなみのくずちんぴらーのくずよーじょー派遣社員こかこかー?
哀川翔おわおわー青ーー相川七瀬歌集くずよどおWさーなみきーおわおわーのこえーしけー?はくちー歌手おわおわーしけー^−

901 :まんこー誠まこしけーパン屋横須賀公郷町誠まましけーしけー:2024/06/08(土) 05:26:58.96
工藤静香こえこえースレッド?どおわーしけーこあっこかー?ドラマもーこどもージュ後90人形俳優のこかー死ぬ世の中こどもーはけーおわおわー

十年一日でしねしねーこどもーはけーべいん−なんー?こえこえーしけーおわおわー
くどおわーおわおわーくどおわーおわおわーしけーくごーしけーしけーしょーふみこしけーおわおわー浅井恵子くよくねーいおいお0^−Kじゅよんーおわおわーおかまーしけー^
浅井恵子くずしけーおわおわー志村けん加奈子サイババ覚醒剤オワ青木智澄民主党くずよーこっけここP−・SYぽーふーしょーふこやーばかうんこー
しょP−がXこーいおいおー^おわおわーくごーしけーみかんーしけー未可子おわおわー人形俳優もしけーおわおわー異常国内しけーおわおわー^タレントおよけーんみころしけー
タカアンドトシもしけーしけー変態まじーえろけーしけー音楽界ソープもしけーおわおわーしけーおわおわー仲間由紀恵しけーおわおわー

902 :まんこー誠まこしけーパン屋横須賀公郷町誠まましけーしけー:2024/06/08(土) 05:27:49.72
工藤静香こえこえースレッド?どおわーしけーこあっこかー?ドラマもじみけー自民党
覚醒買う各層自害おわおわ加藤浩次ガキ子孫もしえーしけーおわおわーー加藤浩次えたよー斯波くずけーら横須賀ー?
加藤浩次えたよーこえもしけーおわーーこどもージュ後90人形俳優のこかー死ぬ世の中こどもーはけーおわおわー

十年一日でしねしねーこどもーはけーべいん−なんー?こえこえーしけーおわおわー
くどおわーおわおわーくどおわーおわおわーしけーくごーしけーしけーしょーふみこしけーおわおわー浅井恵子くよくねーいおいお0^−Kじゅよんーおわおわーおかまーしけー^
浅井恵子くずしけーおわおわー志村けん加奈子サイババ覚醒剤オワ青木智澄民主党くずよーこっけここP−・SYぽーふーしょーふこやーばかうんこー
しょP−がXこーいおいおー^おわおわーくごーしけーみかんーしけー未可子おわおわー人形俳優もしけーおわおわー異常国内しけーおわおわー^タレントおよけーんみころしけー
タカアンドトシもしけーしけー変態まじーえろけーしけー音楽界ソープもしけーおわおわーしけーおわおわー仲間由紀恵しけーおわおわー

903 :まんこー誠まこしけーパン屋横須賀公郷町誠まましけーしけー:2024/06/08(土) 05:29:42.70
工藤静香こえこえースレッド?どおわーしけーこあっこかー?ドラマもじみけー自民党
覚醒買う各層自害おわおわ加藤浩次ガキ子孫もしえーしけーおわおわーー加藤浩次えたよー斯波くずけーら横須賀ー?
加藤浩次えたよーこえもしけーおわーーこどもージュ後90人形俳優の中井貴一六本木ろっこー科学班員?犯行?きこー食品でどくけーでしけーおわおわー
供養塔のーちん−おわおっわいないじゃんー?_ドラマめかねーもしけーじみけー自民党もしけーおわおわー
はくTりよーはくちよーしけーSけーこさいけーSぃけーおわおわ?
アロケーション井地おわおわー石田ゆり子はくちーかこーのばかうんこーじゃんしけーしけーひかりーおわおわーしけーしけーこかいんーお持つこといこーおわおわー?
いちごーこかいんーこかいんー石田ゆり子_?はくちーひかりーおわおわーしけーしけー家庭特異移民けのくずいこーべいん−なんー?
石田ゆり子はくちこえW−

904 :まんこー誠まこしけーパン屋横須賀公郷町誠まましけーしけー:2024/06/08(土) 05:30:30.02
工藤静香こえこえースレッド?どおわーしけーこあっこかー?ドラマもじみけー自民党
覚醒買う各層自害おわおわ加藤浩次ガキ子孫もしえーしけーおわおわーー加藤浩次えたよー斯波くずけーら横須賀ー?
加藤浩次えたよーこえもしけーおわーーこどもージュ後90人形俳優の中井貴一六本木ろっこー科学班員?犯行?きこー食品でどくけーでしけーおわおわー
供養塔のーちん−おわおっわいないじゃんー?_ドラマめかねーもしけーPPP−コリアン中山美穂しのぶ?おくじどのおかねーー

石田ゆり子はくちけーまんんざいーしけーおわおわー満里奈ネプチューン?石田ゆり子お金儲け異常こあっこかー?石田ゆり子光よーこあこかーこかー
ーじみけー自民党もしけーおわおわー
はくTりよーはくちよーしけーSけーこさいけーSぃけーおわおわ?
アロケーション井地おわおわー石田ゆり子はくちーかこーのばかうんこーじゃんしけーしけーひかりーおわおわーしけーしけーこかいんーお持つこといこーおわおわー?
いちごーこかいんーこかいんー石田ゆり子_?はくちーひかりーおわおわーしけーしけー家庭特異移民けのくずいこーべいん−なんー?
石田ゆり子はくちこえW−

905 :まんこー誠まこしけーパン屋横須賀公郷町誠まましけーしけー:2024/06/08(土) 05:31:24.61
工藤静香こえこえースレッド?どおわーしけーこあっこかー?ドラマもえろしけーへぼちんくず本田啓子みせどおわー?

ほせーどおわーちんこーこかー?細いー^こーだいーこかーこかー・

三崎しけーしけーおわおわー蕎麦屋ばばーも事件簿みんなおわおわー民主党三崎おわおわーしけーしけーー
じみけー自民党
覚醒買う各層自害おわおわ加藤浩次ガキ子孫もしえーしけーおわおわーー加藤浩次えたよー斯波くずけーら横須賀ー?
加藤浩次えたよーこえもしけーおわーーこどもージュ後90人形俳優の中井貴一六本木ろっこー科学班員?犯行?きこー食品でどくけーでしけーおわおわー
供養塔のーちん−おわおっわいないじゃんー?_ドラマめかねーもしけーPPP−コリアン中山美穂しのぶ?おくじどのおかねーー

石田ゆり子はくちけーまんんざいーしけーおわおわー満里奈ネプチューン?石田ゆり子お金儲け異常こあっこかー?石田ゆり子光よーこあこかーこかー
ーじみけー自民党もしけーおわおわー
はくTりよーはくちよーしけーSけーこさいけーSぃけーおわおわ?
アロケーション井地おわおわー石田ゆり子はくちーかこーのばかうんこーじゃんしけーしけーひかりーおわおわーしけーしけーこかいんーお持つこといこーおわおわー?
いちごーこかいんーこかいんー石田ゆり子_?はくちーひかりーおわおわーしけーしけー家庭特異移民けのくずいこーべいん−なんー?
石田ゆり子はくちこえW−

906 :まんこー誠まこしけーパン屋横須賀公郷町誠まましけーしけー:2024/06/08(土) 05:33:14.52
工藤静香こえこえースレッド?どおわーしけーこあっこかー?ドラマもえろこしけーこんなーあほー
婚約蒟蒻?保阪なみこかしけー0しけー?細いどおわーちんこーこかー?しけーしけーおわおわー
らー0面おわおわー対角線しけーしけーおわおわー?細いちんぴらーのくずちぃんこーほせー血まみれ
ドラマめかねーもしけーえろこしけーねーこーしけーでー^?さんまーえたYとーじょーー今越家しえーいまこしけーおWくおわおわー

さんまーむあKしからーえたよーじょーパンパン晩語句?しえーいまこしけーおWくおわおわー?
サンuンまさんまーはくちやんーえろしけーへぼちんくず本田啓子異常こえーみけのくずしけー韓国?三崎こーじょーころしーえたきー
みせどおわー?

ほせーどおわーちんこーこかー?細いー^こーだいーこかーこかー・

三崎しけーしけーおわおわー蕎麦屋ばばーも事件簿みんなおわおわー民主党三崎おわおわーしけーしけーー
じみけー自民党
覚醒買う各層自害おわおわ加藤浩次ガキ子孫もしえーしけーおわおわーー加藤浩次えたよー斯波くずけーら横須賀ー?
加藤浩次えたよーこえもしけーおわーーこどもージュ後90人形俳優の中井貴一六本木ろっこー科学班員?犯行?きこー食品でどくけーでしけーおわおわー
供養塔のーちん−おわおっわいないじゃんー?_ドラマめかねーもしけーPPP−コリアン中山美穂しのぶ?おくじどのおかねーー

石田ゆり子はくちけーまんんざいーしけーおわおわー満里奈ネプチューン?石田ゆり子お金儲け異常こあっこかー?石田ゆり子光よーこあこかーこかー
ーじみけー自民党もしけーおわおわー
はくTりよーはくちよーしけーSけーこさいけーSぃけーおわおわ?
アロケーション井地おわおわー石田ゆり子はくちーかこーのばかうんこーじゃんしけーしけーひかりーおわおわーしけーしけーこかいんーお持つこといこーおわおわー?
いちごーこかいんーこかいんー石田ゆり子_?はくちーひかりーおわおわーしけーしけー家庭特異移民けのくずいこーべいん−なんー?
石田ゆり子はくちこえW−

907 :卵の名無しさん :2024/06/08(土) 06:36:56.04 ID:/om7GUkj0.net
6月から市町村の胃がん健診が始まって忙しくなった。

908 :卵の名無しさん :2024/06/08(土) 06:43:11.50 ID:/om7GUkj0.net
>>883
エクセルのマクロなら事務に必要だろうがWolfram言語が必要なわけがないぞ。Wolfram言語使えない低能?登録すれば無料で使えるぞ。

909 :卵の名無しさん :2024/06/08(土) 06:49:23.30 ID:/om7GUkj0.net
>>889
上皇の執刀医も多浪だったような。

910 :卵の名無しさん :2024/06/08(土) 07:12:18.14 ID:/om7GUkj0.net
f[n_] := Length@Select[ResourceFunction["CommonDivisors"][Differences[Sort[n]]],Mod[Max[n],#]!=0&]
f[{149,218,333}]
li=Subsets[Range[100,999],{3}];
Select[li,f[#]==1]

library(numbers)
f=\(n){
mGCD(diff(sort(n))) |> divisors() -> m
m[n[1]%%m!=0]}
fn=\(n) length(f(n))==1
fn(c(149,218,333)
library(RcppAlgos)
cm=comboGeneral(100:999,3)
idx=apply(cm,1,fn)
cm[idx,]

911 :卵の名無しさん :2024/06/08(土) 07:28:58.83 ID:L8G9MY5Xd.net
>>908
んで、Wolfram言語は医者に必要なの?www

912 :卵の名無しさん :2024/06/08(土) 07:44:39.01 ID:Zv4Xja650.net
湘南鎌倉総合病院には元旭川医科大学勤務で国立大の弘前大学卒の元AV女優浅丘りなこと田中茉里子(旧姓古郡)がいるもんね
https://www.skgh.jp/department/hbps/
https://www.suruga-ya.jp/product/detail/131150111
http://www.oma-aozora.jp/ikizama/kisamai/welcome_02.html

913 :卵の名無しさん (ワッチョイ 73cc-2xmV [114.145.56.79]):2024/06/08(土) 14:25:05.82 ID:/om7GUkj0.net
臨床統計のイロハのイの問題

ある新薬の治験に2024人参加したとする。
この治験でn人にひとりの割合で起こる副作用を99%以上の確率で見いだすことができる。
nの最大値を求めよ。

RでもWolframでも関数電卓でも計算できる。

914 :卵の名無しさん :2024/06/08(土) 16:45:20.07 ID:/om7GUkj0.net
Wolfram言語の医学への応用例
https://youtu.be/-kI9J0k8pYA

俺はRで似たようなグラフを描いた。
https://i.imgur.com/hCfBTyc.png

915 ::2024/06/08(土) 18:04:09.56 ID:AWqCNw1r0.net
>>914
wolframは医者に必要かどうかすら答えられない脳内医者みたいだな

916 :卵の名無しさん :2024/06/08(土) 18:18:34.65 ID:TuY1dGSE0.net
>>914
これを、臨床で必要と言い張れるところが医者じゃない証拠だよ
感染症の数理モデルが臨床にいるわけないだろwwwマジで何もわかんないだな

917 :卵の名無しさん :2024/06/08(土) 19:26:29.94 ID:Zv4Xja650.net
湘南鎌倉総合病院には元旭川医科大学勤務で国立大の弘前大学卒の元AV女優浅丘りなこと田中茉里子(旧姓古郡)がいるもんね
https://www.skgh.jp/department/hbps/
https://www.suruga-ya.jp/product/detail/131150111
http://www.oma-aozora.jp/ikizama/kisamai/welcome_02.html

918 :まんこー誠まこしけーパン屋横須賀公郷町誠まましけーしけー:2024/06/08(土) 20:29:20.22
工藤静香こえこえースレッド?どおわーしけーこあっこかー?ドラマも蒟蒻畑バカ?
小磯智ちにー殺しけけけK−こここー青木サイババ覚醒剤オワ青木ふみのくずよー絶対稲川もしけーおわおわー
智澄もよこすかー青木智澄こかしけーおわおわ・
子P−こーじっだいー?三浦子0−子こーこーこー?こえっここ0−−?
ちゅうかーしけーしけー青木智澄大輔井上靴屋もコリアンめつきーめWつぼーー悪党の毛尾毛尾こえこえーしけーおわおわー?
葉山じみけー自民党しえーおわ小磯智もしねよーくよけっけけーくよ0−きどりこかーんーーこあこかー木古庭葉山文

919 :まんこー誠まこしけーパン屋横須賀公郷町誠まましけーしけー:2024/06/08(土) 20:30:10.20
工藤静香こえこえースレッド?どおわーしけーこあっこかー?ドラマも蒟蒻畑バカ?
小磯智ちにー殺しけけけK−こここー青木サイババいい子ー^ばっかーたちぃききーしけーおわおわー
まんこよーじょーけーまんこよーじょーけー麻莉奈しけーおわおわー?だけー死んだ?
まじかーさんしけー美奈代クイズ?_くずよーどおわーしけーおニャン子覚醒剤オワ青木ふみのくずよー絶対稲川もしけーおわおわー
智澄もよこすかー青木智澄こかしけーおわおわ・
子P−こーじっだいー?三浦子0−子こーこーこー?こえっここ0−−?
ちゅうかーしけーしけー青木智澄大輔井上靴屋もコリアンめつきーめWつぼーー悪党の毛尾毛尾こえこえーしけーおわおわー?
葉山じみけー自民党しえーおわ小磯智もしねよーくよけっけけーくよ0−きどりこかーんーーこあこかー木古庭葉山文

920 :まんこー誠まこしけーパン屋横須賀公郷町誠まましけーしけー:2024/06/08(土) 20:31:20.04
工藤静香こえこえースレッド?どおわーしけーこあっこかー?ドラマも蒟蒻畑バカ?
小磯智ちにー殺しけけけK−こここー青木サイババいい子ー美奈代ジャーナリストもいいじゃんーじゃーじゃーしえけーこしけーこけここー

どおわーちんこーこかー?どおわーちんこーこかー?工藤静香おわおわ池殿町いけどのー池沼どおわー工藤静香
ーしけーーいいくさめーしけーおWくおわおわもー?
おくおわおおわー?のーちんー^頃ジー?^ばっかーたちぃききーしけーおわおわー
まんこよーじょーけーまんこよーじょーけー麻莉奈しけーおわおわー?だけー死んだ?
まじかーさんしけー美奈代クイズ?_くずよーどおわーしけーおニャン子覚醒剤オワ青木ふみのくずよー絶対稲川もしけーおわおわー
智澄もよこすかー青木智澄こかしけーおわおわ・
子P−こーじっだいー?三浦子0−子こーこーこー?こえっここ0−−?
ちゅうかーしけーしけー青木智澄大輔井上靴屋もコリアンめつきーめWつぼーー悪党の毛尾毛尾こえこえーしけーおわおわー?
葉山じみけー自民党しえーおわ小磯智もしねよーくよけっけけーくよ0−きどりこかーんーーこあこかー木古庭葉山文

921 :まんこー誠まこしけーパン屋横須賀公郷町誠まましけーしけー:2024/06/08(土) 20:40:28.76
工藤静香こえこえースレッド?どおわーしけーこあっこかー?ドラマも蒟蒻畑バカ?
小磯智ちにー殺しけけけK−こここー青木サイババいい子ー美奈代ジャーナリストもいいじゃんー?本当にDだよねー?
いっこーいい子ー^同じこと言う委員会工藤静香工藤医院工藤Mのいおいおーいい子ー^しけーころせよこすかーでしけーしね?
最低のインドあどおわーしけー_アバター^羅ジュークでしけーしね?べいんーのこえーあさじなみこかいんーくふぉーまこしけーくごまちーこかいんーこかいんー72ね_?しえーおわ?

71ねんころーーだ71ねんころーーだ30歳以上おわおわーなのにー?恩ヤン子のお金恩ヤン子のお金おニャン子
異常やっけけけこここPきゃんきゃんーしけー満里奈ネプチュ
76ねんーーばかきつねーしけーやれどをわあかーみんなーしけーおわーころせーせーじもころせーせーしんかーりかー体育館やりまん−しけーおわー医者儲けいおわおわーしけーおわころせーけーーおわ

922 :まんこー誠まこしけーパン屋横須賀公郷町誠まましけーしけー:2024/06/08(土) 20:41:45.06
工藤静香こえこえースレッド?どおわーしけーこあっこかー?ドラマも蒟蒻畑バカ?
小磯智ちにー殺しけけけK−こここー青木サイババいい子ー美奈代ジャーナリストもいいじゃんー?本当にDだよねー?
いっこーいい子ー^同じこと言う委員会工藤静香班員?こーかんーしけーしけー?工藤医院工藤班員?工藤医院工藤?
工藤医院工藤?工藤医院工藤?くどーしょーしこしこー犯人犯人?ないこーしけーおわー?
せんじょー?まんこっこジャーナリストもしけーおわおわーころせW−よ0−じゃーおわおわー工藤医院工藤Mのいおいおーいい子ー^しけーころせよこすかーでしけーしね?
最低のインドあどおわーしけー_アバター^羅ジュークでしけーしね?べいんーのこえーあさじなみこかいんーくふぉーまこしけーくごまちーこかいんーこかいんー72ね_?しえーおわ?

71ねんころーーだ71ねんころーーだ30歳以上おわおわーなのにー?恩ヤン子のお金恩ヤン子のお金おニャン子
異常やっけけけこここPきゃんきゃんーしけー満里奈ネプチュ
76ねんーーばかきつねーしけーやれどをわあかーみんなーしけーおわーころせーせーじもころせーせーしんかーりかー体育館やりまん−しけーおわー医者儲けいおわおわーしけーおわころせーけーーおわ

923 :まんこー誠まこしけーパン屋横須賀公郷町誠まましけーしけー:2024/06/08(土) 20:47:47.78
工藤静香こえこえースレッド?どおわーしけーこあっこかー?ドラマも蒟蒻畑バカ?
小磯智ちにー殺しけけけK−こここー青木サイババいい子ー美奈代に声稼ぎ¥・おわおわーなのにー?
おわおわーなのにー?美奈代おニャン子言い逃れしけーおわおわーこえこえーしけーおわおわー?
美奈代おニャン子渡辺明宏じみけー自民党ジャーナリストおわおわーなのにー?
貧困山下奈美子会こかこかーしけーしけーころせW−よ0−じゃーおわおわー

渡辺あきほろーー明宏貧乏くごーまTりにーきつねーあほけーーらよーーこえこえーー

渡辺あきほろーーおわおわーなのにー?しけーおわおわー?べいんーのこえー横須賀ー?
美奈代おニャン子だS−りんーころどおわーしけーしえーしけーやーこしけーしけー

山下うさかおーしけーたぬきー出っ歯おわおわーなのにー?堀越孝明佐野町山下小屋株スカウトーコカイン
いやねー医薬品のコカインいい子ー^・めかねー探照灯啓子本田啓子笑う声くずけーものーものーしけーしけー
青山学院女子短期大学いコーチ運賃ー?チベットかおりーかおりーしけーしけー
美奈代おニャン子しけーおわおわーせーこしけーおわおわー?まSまいまさみおーおわおわー韓国?連行外国人インド顔ppp−子オワ
啓子本田啓子?うそどおわーどおわーしけーしけーおニャン子おにHぎりーおわおわーなのにー?
温めない?鬼木ロお濁り鬼越おわおわーなのにー?どおわー鬼木しけーおわおわー新田恵利オワあほーけつよーしけーおわおわ?
しょーふこやーばかうんこー工藤医院工藤?かこころしーみけーなーくずーー?犯人?おわおわーなのにー?
ちにーかこころしー・恩ヤン子のお金恩ヤン子のお金おニャン子なみのくずーはくちけーぶすぶすーかこー青木智澄大輔井上靴屋いじめこかー?>三崎市内かこーしけーもー?
こえーこえー異常者ヒッピー覚醒剤

のーちん−おわおっわ?みんなーしけーおわーころせー城之内じょうBのうーーあげーしけーしけーー
満里奈加工の婚約蒟蒻?かこー?子声こえこえーべいんーのこえーいでぃおーっとーーしけーこんにゃく従業員部長なんかーないよーめー0るー_?
ある横須賀あっくんーおわしけー高梨どおわーしけー部落部落ブラマヨみたいなー変態どおわーよーしけー
野良委の来
れみのうちー茅ヶ崎だんちこかー芹澤なみのくずーはくちけー?_

924 :まんこー誠まこしけーパン屋横須賀公郷町誠まましけーしけー:2024/06/08(土) 22:54:55.94
行くのあきこーしけー
生稲晃子じょーけーしけーしょーふーお¥おわおわおわしけーしけー^やれよーもP−おわーしけー
気司江口おkまあーおかまーしけーおわおわーしけーしけーー
こくちねー?やくざーこかー女ばかのこしー死ぬなみんなおわおわーしけーころDせー女ばかのこしーてどおわーおわおわー・
しけー女目安みんなーころせー来てるおわおわー全国異常しけーおわー
むすめーおわーしけーしけーころせー役立たずよーしけーおわー
藤井フミヤおわおわーしけーしけーー
おかKましけーおかまーしけーしけーおわー?藤井フミヤ?こえーこどもー知らないしけー残れないおわおわーしけーしけーー?
藤井フミヤ?」市子?一子おわおわーしけーしけーー変態むつきかたよ心あるの?
ないころしーおわおわーしけーしけーの?刑務所どこしけー?心ある?
斉藤あほけーものー倫理どおわーやくざーじゃん−かこでーねーデータベース

925 :まんこー誠まこしけーパン屋横須賀公郷町誠まましけーしけー:2024/06/08(土) 22:55:30.05
行くのあきこーしけー
生稲晃子じょーけーしけーしょーふーお¥おわおわおわしけーしけー福井記念病院おわおわーユーミンしけーおわーめかねーしけーーみんなーころせしねしねおめこしけーおわおわー
いつもユーミン?^やれよーもP−おわーしけー
気司江口おkまあーおかまーしけーおわおわーしけーしけーー
こくちねー?やくざーこかー女ばかのこしー死ぬなみんなおわおわーしけーころDせー女ばかのこしーてどおわーおわおわー・
しけー女目安みんなーころせー来てるおわおわー全国異常しけーおわー
むすめーおわーしけーしけーころせー役立たずよーしけーおわー
藤井フミヤおわおわーしけーしけーー
おかKましけーおかまーしけーしけーおわー?藤井フミヤ?こえーこどもー知らないしけー残れないおわおわーしけーしけーー?
藤井フミヤ?」市子?一子おわおわーしけーしけーー変態むつきかたよ心あるの?
ないころしーおわおわーしけーしけーの?刑務所どこしけー?心ある?
斉藤あほけーものー倫理どおわーやくざーじゃん−かこでーねーデータベース

926 : 警備員[Lv.6][新芽] (ワッチョイ 7f5a-Uf6x [2001:268:9235:fe9c:*]):2024/06/08(土) 20:30:56.17 ID:GwU2+7AZ0.net
尿瓶ジジイもバカにしがいがなくなってきたな

927 :まんこー誠まこしけーパン屋横須賀公郷町誠まましけーしけー:2024/06/08(土) 23:09:00.05
行くのあきこーしけー
生稲晃子じょーけーしけーしょーふーお¥おわおわおわしけーしけー福ちゃんしけーおわー?
化粧筆北海道自殺ラーメン保安ころしけーもの黒人?なかだしーちんこーよーこすかーでもーするよーこーしけーしけーー

ゴーじゅーに際ころしけーもの?発芽玄米のーくずくずばばーみてー0なーおめこしけーおわおわー
ちくるよー^全部射撃しておわおわーころせーおわおわーしねしね黒人?のーねこちゃんー0しけーしけー?
いいこよねー幼い頃頭ぶTるけたよー?井記念病院おわおわーユーミンしけーおわーめかねーしけーーみんなーころせしねしねおめこしけーおわおわー
いつもユーミン?^やれよーもP−おわーしけー
気司江口おkまあーおかまーしけーおわおわーしけーしけーー
こくちねー?やくざーこかー女ばかのこしー死ぬなみんなおわおわーしけーころDせー女ばかのこしーてどおわーおわおわー・
しけー女目安みんなーころせー来てるおわおわー全国異常しけーおわー
むすめーおわーしけーしけーころせー役立たずよーしけーおわー
藤井フミヤおわおわーしけーしけーー
おかKましけーおかまーしけーしけーおわー?藤井フミヤ?こえーこどもー知らないしけー残れないおわおわーしけーしけーー?
藤井フミヤ?」市子?一子おわおわーしけーしけーー変態むつきかたよ心あるの?
ないころしーおわおわーしけーしけーの?刑務所どこしけー?心ある?
斉藤あほけーものー倫理どおわーやくざーじゃん−かこでーねーデータベース

928 :卵の名無しさん :2024/06/09(日) 04:32:13.73 ID:JHmHgQHX0.net
WolframやRなしでも>913の計算はできる。
計算してみ。

929 :卵の名無しさん :2024/06/09(日) 04:33:47.83 ID:JHmHgQHX0.net
>>916
>913の臨床問題の計算できないの?

930 :卵の名無しさん (ワッチョイ c3d6-KQ+b [240b:11:241:7900:*]):2024/06/09(日) 06:24:07.24 ID:4fjzozfw0.net
>>929
臨床問題wwwお前本当馬鹿なんだな
じゃあ自称消化器外科のお前に問題出してやるよ
↓下の画像の病名は?
https://i.imgur.com/dCrMTtn.jpeg

931 :卵の名無しさん (ワッチョイ 13cc-EeFD [114.145.56.79]):2024/06/09(日) 06:37:47.32 ID:JHmHgQHX0.net
>>930
肝腫瘍

>913の答は?

932 :卵の名無しさん (ワッチョイ 13cc-EeFD [114.145.56.79]):2024/06/09(日) 06:39:59.81 ID:JHmHgQHX0.net
その昔、放射線の読影に出したらliver tumorと返ってきた事があったなぁ。

933 :卵の名無しさん :2024/06/09(日) 08:42:52.82 ID:4fjzozfw0.net
>>931
肝腫瘍wwwアバウト過ぎんだろ
肝腫瘍にどれだけ種類あると思ってるんだよ
腫瘍なんて画像みたら当たり前だろ
何の腫瘍か聞いてんだよやっぱ素人だろwww

934 :卵の名無しさん :2024/06/09(日) 09:33:53.34 ID:3UauVkq20.net
湘南鎌倉総合病院には元旭川医科大学勤務で国立大の弘前大学卒の元AV女優浅丘りなこと田中茉里子(旧姓古郡)がいるもんね
https://www.skgh.jp/department/hbps/
https://www.suruga-ya.jp/product/detail/131150111
http://www.oma-aozora.jp/ikizama/kisamai/welcome_02.html

935 ::2024/06/09(日) 12:22:11.15 ID:pq4F2vlB0.net
消化器外科なのになんで素人みたいな答えなんだよタコw

936 :卵の名無しさん (ワッチョイ 037a-fexT [180.43.115.171]):2024/06/09(日) 15:41:08.98 ID:VZ9lNVgS0.net
>>913
あのー医師は統計学なんてほとんどが無知ですが?
そもそも言ってることが理解できません。
副作用を発見できる検査の話ですか?
敏感度とか特異度とかのはなしですか?
何言っているのか理解できません。
文章として成立していません。

937 :卵の名無しさん (ワッチョイ 13cc-EeFD [114.145.56.79]):2024/06/09(日) 16:01:49.73 ID:JHmHgQHX0.net
https://i.imgur.com/y1qthMt.png

938 :卵の名無しさん (ワッチョイ 13cc-EeFD [114.145.56.79]):2024/06/09(日) 16:09:15.38 ID:JHmHgQHX0.net
>>936
8割おじさんのRとStanのスクリプトを走らせたことないの?
感染症疫学のためのデータ分析入門
とか読んでないの?

Rで微分方程式の数値解を算出させてこういうのが書ける。
https://i.imgur.com/hCfBTyc.png
Wolframでも書けるはず。Rのコマンド相当の関数を探すのが面倒なので移植はしない。

939 :卵の名無しさん (ワッチョイ c3d6-KQ+b [240b:11:241:7900:*]):2024/06/09(日) 17:19:56.81 ID:4fjzozfw0.net
>>938
いいから、>>930に答えろよ
消化器外科医なら100%わかるはずだけどな
偽物なら無理だけどwww
ちなみに診断に至った根拠も宜しく

940 :卵の名無しさん :2024/06/09(日) 17:47:46.32 ID:3UauVkq20.net
湘南鎌倉総合病院には元旭川医科大学勤務で国立大の弘前大学卒の元AV女優浅丘りなこと田中茉里子(旧姓古郡)がいるもんね
https://www.skgh.jp/department/hbps/
https://www.suruga-ya.jp/product/detail/131150111
http://www.oma-aozora.jp/ikizama/kisamai/welcome_02.html

941 :卵の名無しさん :2024/06/09(日) 18:05:42.43 ID:HFEEwvQyd.net
>>940
コイツってどう考えても尿瓶ジジイだよな
都合悪くなると話そらすためにこのコピペ書き込んでんだろ
タイミングも質問に答えられない時と同じ

942 ::2024/06/09(日) 18:22:20.92 ID:9RY+qyPZ0.net
>>938
肝腫瘍以外には何も答えられないの?消化器外科医なのに?
みんな分かってたけどやっぱり脳内医者ですねw

943 ::2024/06/09(日) 21:39:46.68 ID:9RY+qyPZ0.net
826:132人目の素数さん:[sage]:2024/06/09(日) 18:24:00.25 ID:ufxwNP4p
>>820
医者板より

882:卵の名無しさん (ワッチョイ c3d6-KQ+b [240b:11:241:7900:*]):2024/06/09(日) 06:24:07.24 ID:4fjzozfw0
>>929
臨床問題wwwお前本当馬鹿なんだな
じゃあ自称消化器外科のお前に問題出してやるよ
↓下の画像の病名は?
https://i.imgur.com/dCrMTtn.jpeg

883:卵の名無しさん (ワッチョイ 13cc-EeFD [114.145.56.79]):[sage]:2024/06/09(日) 06:37:47.32 ID:JHmHgQHX0
>>930
肝腫瘍

>913の答は?

885:卵の名無しさん (ワッチョイ c3d6-KQ+b [240b:11:241:7900:*]):2024/06/09(日) 08:42:52.82 ID:4fjzozfw0
>>931
肝腫瘍wwwアバウト過ぎんだろ
肝腫瘍にどれだけ種類あると思ってるんだよ
腫瘍なんて画像みたら当たり前だろ
何の腫瘍か聞いてんだよやっぱ素人だろwww

829:132人目の素数さん:2024/06/09(日) 20:14:18.92 ID:Tw+C8hwt
>>846
これは恥ずかしい
間違いなく偽医者

412 KB
新着レスの表示

掲示板に戻る 全部 前100 次100 最新50
名前: E-mail (省略可) :

read.cgi ver.24052200