底辺私立医大を卒業した医者って頭悪いよね？ Part10
レス数が1000を超えています。これ以上書き込みはできません。
現在も通用する、不朽の名投稿
(quote)
私は昭和の時代に大学受験したけど、昔は今よりも差別感が凄く、慶応以外の私立医は特殊民のための特殊学校というイメージで開業医のバカ息子以外は誰も受験しようとすらしなかった。
常識的に考えて、数千万という法外な金を払って、しかも同業者からも患者からもバカだの裏口だのと散々罵られるのをわかって好き好んで私立医に行く同級生は一人もいませんでした。
本人には面と向かっては言わないけれど、俺くらいの年代の人間は、おそらくは８－９割は私立卒を今でも「何偉そうなこと抜かしてるんだ、この裏口バカが」と心の底で軽蔑し、嘲笑しているよ。当の本人には面と向かっては絶対にそんなことは言わないけどね。
(unquote) 内海 聡
‏
@touyoui
9月16日
その他
今後の日本はどうなるか？
滅びます。
なにやってもムダです。
放射能と自民だがトドメ。
滅びます。
絶対滅びます。
資格もムダ。
資産もムダ。
土地もムダ。
子どもは病気だらけになる。
ハッパかけてるわけではありません。 高須克弥
✔
@katsuyatakasu
僕も裏口入学だよ。母子家庭の開業医で父親が卒業生で一次試験の成績がよかったので、
二次試験は死んだ父親をよく知っている教授が担当してくれて世間話だけ。入学金も半額に負けてくれた。
昭和医大は人情のわかる素晴らしい大学だった。
何が悪い。 私立医・高須先生 「俺も裏口 私立医は裏口ばかり 何が悪い」 >>5
1: It is not the lowerest tiered medical school but its enrollee that is despicable, which deserves to be called a bona fide moron beyond redemption.
ド底辺シリツ医大が悪いのではない、本人の頭が悪いんだ。 Pythonは日本語対応しているな。
status=["ド底辺シリツ医大卒","裏口バカ","裏口ガイジ"]
choice=input("誰ですか？")
if choice in status:
print("大当たり！")
else:
ド底辺.pyを実行
=== RESTART: C:/Users/madoka/AppData/Local/Programs/Python/Python37/tmp.py ===
誰ですか？裏口バカ
大当たり！ axiom="ド底辺シリツ医大卒＝裏口バカ\n"
rep=input("how many times?")
print(axiom*int(rep))
=== RESTART: C:/Users/madoka/AppData/Local/Programs/Python/Python37/tmp.py ===
how many times?10
ド底辺シリツ医大卒＝裏口バカ
ド底辺シリツ医大卒＝裏口バカ
ド底辺シリツ医大卒＝裏口バカ
ド底辺シリツ医大卒＝裏口バカ
ド底辺シリツ医大卒＝裏口バカ
ド底辺シリツ医大卒＝裏口バカ
ド底辺シリツ医大卒＝裏口バカ
ド底辺シリツ医大卒＝裏口バカ
ド底辺シリツ医大卒＝裏口バカ
ド底辺シリツ医大卒＝裏口バカ 赤玉、青玉、白玉がk個ずつある。
これら3k個の玉を数珠状に並べるとき、
「どの連続した3個の玉の並びについても、赤玉、青玉、白玉が全て含まれることはない」
ような並べ方の総数をkで表せ。
これはきれいな式にはならないみたいだな。
数学板でPC解が投稿された。
回転・反転を同一視、色を区別
k=1: 0
k=2: 1
k=3: 4
k=4: 42
k=5: 335
k=6: 3501
k=6: 36820
k=8: 407629
k=9: 4612825 俺がRでできたのはメモリの制約からk=335まで。
算出した投稿者に尋ねたらPythonで算出したと。
言語の差よりアルゴリズムの差だろうな。 【せいご】安倍晋三首相が国連総会の演説で漢字を読み間違える 「背後」を「せいご」と★6
国民の感想
>こんなんでどうやって大学出たんだ
俺も同感。
そういえば中学数学の一次方程式の比率計算のできない底辺シリツ医大卒がいたなあ、裏口入学なんだろうね。
これが現実 １次方程式もできないド底辺シリツ医大卒の記録
http://imagizer.imageshack.com/img923/2715/RosCsf.jpg
ド底辺シリツ医大卒の裏口バカは自分が馬鹿だという自覚がないから、与えられた数値から計算できない、問題が悪いと言い張るんだよなぁ。悪いのはそいつの頭なのに。
裏口入学が都市伝説だとか過去の話というのは
嘘だと全国民が知りつくしたのが東京医大の事件だね。
縁故や寄付金じゃなくて試験データの改竄。
シリツ＝裏口バカが確定。
まあ、当事者はずっと前に認識していたようだ。
ガチの裏と呼んでその存在を認めている。
http://imagizer.imageshack.com/img923/7955/w1bWeN.jpg
ガチの裏ｗｗｗｗｗｗｗ main = do
print $ take 160 (cycle "GACHI-NO-URA")
Prelude> :main
"GACHI-NO-URAGACHI-NO-URAGACHI-NO-URAGACHI-NO-URAGACHI-NO-URAGACHI-NO-URAGACHI-NO-URAGACHI-
NO-URAGACHI-NO-URAGACHI-NO-URAGACHI-NO-URAGACHI-NO-URAGACHI-NO-URAGACH" コピペだが共感した。
安部も麻生も石破も、2世3世のボンボンで、エスカレーターで碌に試験勉強もせず
私立大に進んでいる。
石破の漢字能力はいかほどかわからないが、英語はまったくできない。
自民党にも頭のいい人間が沢山いるが、トップとして選ばれたのは、ボンクラどもだ。
その自民党を国民が選び、ボンクラたちも地元では絶大に支持されている。
安部の女房は、更に頭が悪く、エスカレーターで馬鹿大にさえ進学できなかった。
それなのに天下の電通にはいり、もちろん仕事もできず、毎晩ジュリアナ東京に通い
社内では「宴会係」であったという。
ただ、彼女は大金持ちの森永一族であるがゆえ大事にしてもらい、安部と見合い結婚
し、円満退社できた。
一方、電通社員で過労・パワハラで自殺した東大文卒の女性は、何のバックもない母子家庭の子。
上司から「無能」と罵倒されていたらしい。
この世は不平等でできている。
安部夫妻を見るたび、つくづくそう思う。 これ難しい。
3より大きな正整数nに対し、2^n+1の素因数がどれもn未満であるようなものは存在するか？ 現在も通用する、不朽の名投稿によると８ー９割の多数意見らしいな。
(quote)
私は昭和の時代に大学受験したけど、昔は今よりも差別感が凄く、慶応以外の私立医は特殊民のための特殊学校というイメージで開業医のバカ息子以外は誰も受験しようとすらしなかった。
常識的に考えて、数千万という法外な金を払って、しかも同業者からも患者からもバカだの裏口だのと散々罵られるのをわかって好き好んで私立医に行く同級生は一人もいませんでした。
本人には面と向かっては言わないけれど、俺くらいの年代の人間は、おそらくは８－９割は私立卒を今でも「何偉そうなこと抜かしてるんだ、この裏口バカが」と心の底で軽蔑し、嘲笑しているよ。当の本人には面と向かっては絶対にそんなことは言わないけどね。
(unquote) ここらへんで手打ちにしませう
でも佐野君は親子で裁かれないといけないと思う 本来はド底辺シリツ医大卒が
裏口入学者を処分しろと声高に唱えるべき。
まあ、
実態はこれだよな。
裏口入学の存在をずっと前から認識している。
http://imagizer.imageshack.com/img923/7955/w1bWeN.jpg 安倍さん 成蹊大（私立）
麻生さん 学習院（私立）
ポッポ 東大、ミズポ 東大、生コン 名大、
エタノ 東北大、モナ男 京大
流石、学歴板で暴れてる奴らの国籍がよく分かるな～ >>22
漢字もろくに読めないのは日本人なんだろうかね？ 学歴だけが全世界と思っているなら本物のバカだし、
ましてや国立医で私立に負けている開業医なんて、本物の底辺だぞ。
人間性って大切だと思う。 ただ東京医大は開心術や肝移植で事件沙汰になったげく
トドメの裏口事件だから学内清算は必要だろう 台風でコンビニ受診がなくてよかった。
早朝の新入院一人のみ。
内視鏡予約が少くて早めに終わったのに列車が遅延:( >>28 は国試に２３回も落ちてて
くるくるぱーの裏口バカに
なっちゃってるのらぁあぁぁ
Ｆラン事務員の濃ゆぅぅい生ガキ汁
ド底辺の臭いが落ちないよぉ
んほおぉぉぉおぉぉ >>29
文章からだけで頭が悪いのが伝わってくる。
スレタイ実証乙。 ,イ ヽ
/ ヽ ヽ ヽ
/ / | {. ハ ハ ヽ
/ :! │ j 八 | | )
,′ i | ｛. i | {＼ ﾊ | i| ﾘ )､ / 国試浪人事務員はド底辺の中のド底辺
ｉ i | 八 ｉ Vx炒¨＾jﾉ}八/ ( ヽ / 敗者は敗者らしく
| ｉ 从 { { ＼八{ //// ｲ )ヾﾉ ( この世界のなるべく闇いところで
Viﾊ ＼|x炒＾j ( (ｲ / 謝りながら生きていくといいのよ
＼＼_V//く _ ) ) ヾ ゝ,
`ｰ小. _-ｧ ( ( ヾ
|i∧ く:::_ノ ) i 丶､ﾞゝ
|ｉ| {丶、 ´ ( | iヾﾞ
ﾉ八{ { {＞ . ／) ｉ ヾ
〃{｛ `ｰ=ミ ｀T爪八 i , ヾ 八
ヾ人＼ ｀ヽ j{__j ｼ｀ヾﾐﾐﾙ'ﾊヽ.ト＜7＼＿＿＿___
／⌒￢=-ミ#ヾ/ ＼ ＼/####/ ｀ヽ
/ ヽ##｀ヽ､ノ⌒ヽ V⌒ゝ､#;;| '.
{ ﾞi####ヽ 八 |'⌒´##ヾ |
| |#####＼/:i ＼'ー‐'i"######ﾞ) |
│ |########| :| ( ⌒ )#######| | コラッツの問題は、「任意の正の整数 n をとり、
n が偶数の場合、n を 2 で割る
n が奇数の場合、n に 3 をかけて 1 を足す
「どんな初期値から始めても、有限回の操作のうちに必ず 1 に到達する」 >>32
１０００で始めると
collatz 1000
[1000,500,250,125,376,188,94,47,142,71,214,107,322,161,484,242,121,364,182,91,274,137,412,206,103,310,155,466,233,700,350,175,526,263,790,395,1186,593
,1780,890,445,1336,668,334,167,502,251,754,377,1132,566,283,850,425,1276,638,319,958,479,1438,719,2158,1079,3238,1619,4858,2429,7288,3644,1822,911,2734,
1367,4102,2051,6154,3077,9232,4616,2308,1154,577,1732,866,433,1300,650,325,976,488,244,122,61,184,92,46,23,70,35,106,53,160,80,40,20,10,5,16,8,4,2,1]
１１２の長さの数列になる。
１００００までの整数で始めたときに１００以上の長さになるのは何個あるか？ num=10000
big=100
collatz :: Integer -> [Integer]
collatz 1 = [1]
collatz n
|even n = n : collatz (n `div` 2)
|odd n = n : collatz (3 * n + 1)
howMany = length (filter (>big) (map length (map collatz [1..num]) ))
numLength=length (filter isLong (map collatz[1..num]))
where isLong x = length(x) > 15
maxLength=maximum(map length (map collatz [1..num]))
listLength=map length (map collatz [1..num])
y=zip [1..num] listLength
-- [(a,b)|(a,b)<-y,b==maxLength] １0000までだと6171のときが262個で最大になるな。
[6171,18514,9257,27772,13886,6943,20830,10415,31246,15623,46870,23435,70306,35153,105460,52730,26365,79096,39548,19774,9887,29662,14831,
44494,22247,66742,33371,100114,50057,150172,75086,37543,112630,56315,168946,84473,253420,126710,63355,190066,95033,285100,142550,71275,
213826,106913,320740,160370,80185,240556,120278,60139,180418,90209,270628,135314,67657,202972,101486,50743,152230,76115,228346,114173,
342520,171260,85630,42815,128446,64223,192670,96335,289006,144503,433510,216755,650266,325133,975400,487700,243850,121925,365776,182888
,91444,45722,22861,68584,34292,17146,8573,25720,12860,6430,3215,9646,4823,14470,7235,21706,10853,32560,16280,8140,4070,2035,6106,3053,9160,
4580,2290,1145,3436,1718,859,2578,1289,3868,1934,967,2902,1451,4354,2177,6532,3266,1633,4900,2450,1225,3676,1838,919,2758,1379,4138,2069,6208,
3104,1552,776,388,194,97,292,146,73,220,110,55,166,83,250,125,376,188,94,47,142,71,214,107,322,161,484,242,121,364,182,91,274,137,412,206,103,310,155,
466,233,700,350,175,526,263,790,395,1186,593,1780,890,445,1336,668,334,167,502,251,754,377,1132,566,283,850,425,1276,638,319,958,479,1438,719,2158
,1079,3238,1619,4858,2429,7288,3644,1822,911,2734,1367,4102,2051,6154,3077,9232,4616,2308,1154,577,1732,866,433,1300,650,325,976,488,244,122,61,
184,92,46,23,70,35,106,53,160,80,40,20,10,5,16,8,4,2,1]
おい、ド底辺 これより長いのがあるかないか検証してみろ！
２での割り算、３での掛け算足す１くらいできるんだろ？？？ Rで書いてもそれほど長くならないな、
coll <- function(n){
if(n==1) return(1)
else
if(n%%2) return(c(n,coll(3*n+1)))
else return(c(n,coll(n/2)))
}
lc <- function(n) length(coll(n))
vlc=Vectorize(lc)
n=1:10000
y=vlc(n)
plot(n,y,bty='l',cex=0.75)
which.max(y)
y[which.max(y)]
実行速度も苦にならず
なんといっても結果が直ぐにグラフ化できるのが( ・∀・)ｲｲ!!
http://i.imgur.com/cKKdRo6.png 当然ながらHaskellの結果と同じく
> which.max(y)
[1] 6171
> y[which.max(y)]
[1] 262
１０００００までなら
> which.max(y)
[1] 77031
> y[which.max(y)]
[1] 351
Haskellより速く算出されたけど、多分不慣れなHaskellのコードが拙稚なためだろうな。
結果は同じく
Prelude> [(a,b)|(a,b)<-y,b==maxLength]
[(77031,351)]
おい、ド底辺これも検証しておけよ。
部屋割りカウントはお前には難問すぎたらしいしな。 >>37
妬みマンチクリン がどういう意味なんだろうと思ってググってみたら
こんなスレが出てきました
自称医科歯科卒が専門医をねたむスレ [転載禁止]©2ch.net
https://egg.5ch.net/test/read.cgi/hosp/1419213994/l50
このスレを辿ってみたら白黒コピーの医師免許の一部が
大部分を隠してアップされてましたが
https://egg.5ch.net/test/read.cgi/hosp/1419213994/437
これって病院で事務用に保管しているコピーですよね 数列の長さの計算だけならこれでいいな。
cl <- function(x){
len=1
while(x!=1){
x=ifelse(x%%2,3*x+1,x%/%2)
len=len+1
}
return(len)
}
maxlen <- function(N){
max_len=1
for(i in 1:N){
if(cl(i)>max_len){
max_len=cl(i)
index=i
}
}
c(max_len=max_len, index=index)
} map' f xs = foldr (\x acc -> f x:acc) [] xs
elem' y ys = foldr (\x acc -> if x==y then True else acc) False ys
elem'' y ys = foldl(\acc x -> if x==y then True else acc) False ys
main = do
print $ zipWith (\x y -> (x*30+3)/y) [5,4,3,2,1] [1..5]
print $ map (\(a, b) -> a+b) [(1,2),(3,5),(6,3),(2,6),(2,5)]
print $ zipWith (flip (++)) ["love you","is an angel"] ["I ","Mei "]
print $ map (flip subtract 20) [1..5]
print $ foldl (\a b -> a+b) 0 [3,5,2,1]
print $ foldl (-) 0 [1,2,3]
print $ ((0-1)-2)-3
print $ foldr max 0 [1,2,3]
print $ 1 `max` (2 `max`(3 `max` 0))
print $ foldr (-) 0 [1,2,3]
print $ foldr (-) 0 ( 1:(2:(3:[])) )
print $ 1-(2-(3-0))
print $ foldr (\a b -> a-b) 0 ( 1:(2:(3:[])) ) foldrでのelem
Prelude> elem' '裏' "国立大学"
False
Prelude> elem' '裏' "裏口シリツ医大"
True
foldlでのelem
Prelude> elem'' '裏' "裏口シリツ医大"
True
Prelude> elem'' '裏' "国立大学"
False elem_r y ys = foldr (\x acc -> if x==y then True else acc) False ys
elem_r 7 [1..]
elem_r 0 [1..]
Prelude> elem_r 7 [1..]
True
の内部動作は理解しがたい。
http://learnyouahaskell.com/higher-order-functions#folds
One big difference is that right folds work on infinite lists, whereas left ones don't!
To put it plainly, if you take an infinite list at some point and you fold it up from the right, you'll eventually reach the beginning of the list.
However, if you take an infinite list at a point and you try to fold it up from the left, you'll never reach an end! Prelude> foldl1 (-) [1,2,3,4,5]
-13
Prelude> (((1-2)-3)-4)-5
-13
Prelude> foldr1 (-) [1,2,3,4,5]
3
Prelude> 1-(2-(3-(4-5)))
3 main = do
let reverse_L = foldl (\acc x -> x:acc) []
print $ reverse_L "MADAM I M ADAM"
let reverse_R = foldr (\x acc -> acc ++ [x] ) []
putStrLn $ reverse_R ['口','裏']
Prelude> :main
"MADA M I MADAM"
裏口
ここで一句
裏口の 口裏あわせる ド底辺 >>42
右側foldでもfold 後の処理は左からやっていると考えれば理解可。実際の内部処理はよく分からんが、
elem_r 0 [1..]は無限に続いて終了しないのと辻褄が合う。 タミフルとの比較の生データがほしいところだな。
グラフだと60時間を越えるとタミフルの方が有症状割合が低くみえるが、中央値ではゾフルーザの方が有症状時間が短くなっている。
信頼区間算出にブートストラップか。
各々のヒストグラムをみてみたい。
http://imagizer.imageshack.com/img924/7173/aQ153k.jpg iterate takes a function and a starting value. It applies the function to
the starting value, then it applies that function to the result, then it applies
the function to that result again, etc. It returns all the results in the form of
an infinite list.
これを実行してみる。
Prelude> putStrLn $ concat.take 10 $ iterate (++ []) "裏口シリツ "
結果は、
裏口シリツ 裏口シリツ 裏口シリツ 裏口シリツ 裏口シリツ 裏口シリツ 裏口シリツ 裏口シリツ 裏口シリツ 裏口シリツ Prelude> (a,b) = splitAt 6 "ド底辺シリツ医大卒"
Prelude> putStrLn a
ド底辺シリツ import Data.Char
encode offset = map (chr.(+ offset).ord)
decode offset = map (chr.(subtract offset).ord)
main = do
print $ encode 5 "please instruct your men."
print $ decode 5 "uqjfxj%nsxywzhy%~tzw%rjs3"
putStrLn $ encode 5 "ド底辺シリツ医大卒は裏口ガイジ"
putStrLn $ decode 5 "ノ庚辿ゼワド區夬南ぴ裔叨ケォソ" きちんと復号された。
Prelude> putStrLn $ decode 5 "ノ庚辿ゼワド區夬南ぴ裔叨ケォソ"
ド底辺シリツ医大卒は裏口ガイジ ★★★★★★★超最新版★★★★★★★
第2回駿台全国判定模試 2018年度合格目標ライン 国公立大学医学部医学科偏差値(前期日程) 2018年9月28日更新
※+●東京大学(理科Ⅰ類、理科Ⅱ類)、★京都大学(理、工、農、薬、経済･理系、教育･理系、総合人間･理系)、
▼東京工業大学を含む
https://www2.i-sum.jp/yobi/sv/sundai/member_P/member_goukaku_PD/1337144684076.html
73--東京
72--京都 ←★★★★★祝ノーベル医学生理学賞受賞★★★★★
71--大阪、東京医科歯科
70--名古屋
69--東北、九州、千葉、横浜市立、京都府立医科、大阪市立、神戸、広島、●東京(理科Ⅰ類)
68--北海道、筑波、山梨(後期)、岡山
67--金沢、名古屋市立、奈良県立医科、長崎
66--新潟、岐阜、三重、和歌山県立医科、熊本、●東京(理科Ⅱ類)、★京都(理)、★京都(薬)、★京都(工･物理工)、
―★京都(農･応用生命科、食品生物科)
65--札幌医科、群馬、富山、信州、浜松医科、滋賀医科、山口、高知、鹿児島、★京都(工･情報)
64--福井、鳥取、徳島、香川、愛媛、大分、★京都(工･建築)、★京都(農･資源生物科、食料/環境経済)、
―★京都(総合人間･理系)、▼東京工業(工)、▼東京工業(情報理工)
63--旭川医科、秋田、山形、福島県立医科、島根、佐賀、宮崎、琉球、★京都(工･工業化、電気電子工)、
―★京都(農･地域環境工、森林科)、★京都(経済･理系)、★京都(教育･理系)、▼東京工業(物質理工)、
―▼東京工業(環境社会理工)
62--弘前、★京都(工･地球工)、▼東京工業(理)、▼東京工業(生命理工) 普通は教育投資すればある程度の学力は身につく。
シリツ医大の高額学費が払える経済環境で教育投資したはず。
それでもド底辺シリツ医大にしか入れないのはそういうことだｗ．
そして、
ド底辺シリツ医大卒の医者は
数千万から億の金をド底辺シリツ医大に投資しているから
それを回収しようという行動にでる。
まあ、学究派がいないのはド底辺シリツ医大卒なら当然。 nを正の整数とする。2数の積
n×123456789
のすべての桁の数字が1となるようなnを考える。
（1）そのようなnを1つ求めよ。
（2）そのようなnは無数に存在するか。
Haskell の練習
nums = map show $ map (123456789*) [1..]
main = do
print $ filter (all (=='1')) nums 動作確認してから本題に移ろう。
解がないのかバグなのか判定できないから。
import Data.List
nums = map show $ map (123456789*) [1..]
nums0 = map show $ map (12345679*) [1..100]
main = do
print $ find (all (=='1')) nums0
print $ find (all (=='1')) nums
Prelude> :main
Just "111111111"
Interrupted. ABOとRhを組み合わせて8種類血液型があるとしてその頻度をa,b,c,d,e,f,g,hとすると
少なくとも各型1人が含まれる期待値の計算式は以下の通り
（当然、こういうのはプログラミングして書き出させる。）
1/a+1/b+1/c+1/d+1/e+1/f+1/g+1/h -
{1/(a+b)+1/(a+c)+1/(a+d)+1/(a+e)+1/(a+f)+1/(a+g)+1/(a+h)+1/(b+c)+1/(b+d)+1/(b+e)+1/(b+f)+1/(b+g)+1/(b+h)+1/(c+d
)+1/(c+e)+1/(c+f)+1/(c+g)+1/(c+h)+1/(d+e)+1/(d+f)+1/(d+g)+1/(d+h)+1/(e+f)+1/(e+g)+1/(e+h)+1/(f+g)+1/(f+h)+1/(g+
h)} +
{1/(a+b+c)+1/(a+b+d)+1/(a+b+e)+1/(a+b+f)+1/(a+b+g)+1/(a+b+h)+1/(a+c+d)+1/(a+c+e)+1/(a+c+f)+1/(a+c+g)+1/(a+c+h)+
1/(a+d+e)+1/(a+d+f)+1/(a+d+g)+1/(a+d+h)+1/(a+e+f)+1/(a+e+g)+1/(a+e+h)+1/(a+f+g)+1/(a+f+h)+1/(a+g+h)+1/(b+c+d)+1
/(b+c+e)+1/(b+c+f)+1/(b+c+g)+1/(b+c+h)+1/(b+d+e)+1/(b+d+f)+1/(b+d+g)+1/(b+d+h)+1/(b+e+f)+1/(b+e+g)+1/(b+e+h)+1/
(b+f+g)+1/(b+f+h)+1/(b+g+h)+1/(c+d+e)+1/(c+d+f)+1/(c+d+g)+1/(c+d+h)+1/(c+e+f)+1/(c+e+g)+1/(c+e+h)+1/(c+f+g)+1/(
c+f+h)+1/(c+g+h)+1/(d+e+f)+1/(d+e+g)+1/(d+e+h)+1/(d+f+g)+1/(d+f+h)+1/(d+g+h)+1/(e+f+g)+1/(e+f+h)+1/(e+g+h)+1/(f
+g+h)} -
（続く） {1/(a+b+c+d)+1/(a+b+c+e)+1/(a+b+c+f)+1/(a+b+c+g)+1/(a+b+c+h)+1/(a+b+d+e)+1/(a+b+d+f)+1/(a+b+d+g)+1/(a+b+d+h)+1/
(a+b+e+f)+1/(a+b+e+g)+1/(a+b+e+h)+1/(a+b+f+g)+1/(a+b+f+h)+1/(a+b+g+h)+1/(a+c+d+e)+1/(a+c+d+f)+1/(a+c+d+g)+1/(a+
c+d+h)+1/(a+c+e+f)+1/(a+c+e+g)+1/(a+c+e+h)+1/(a+c+f+g)+1/(a+c+f+h)+1/(a+c+g+h)+1/(a+d+e+f)+1/(a+d+e+g)+1/(a+d+e
+h)+1/(a+d+f+g)+1/(a+d+f+h)+1/(a+d+g+h)+1/(a+e+f+g)+1/(a+e+f+h)+1/(a+e+g+h)+1/(a+f+g+h)+1/(b+c+d+e)+1/(b+c+d+f)
+1/(b+c+d+g)+1/(b+c+d+h)+1/(b+c+e+f)+1/(b+c+e+g)+1/(b+c+e+h)+1/(b+c+f+g)+1/(b+c+f+h)+1/(b+c+g+h)+1/(b+d+e+f)+1/
(b+d+e+g)+1/(b+d+e+h)+1/(b+d+f+g)+1/(b+d+f+h)+1/(b+d+g+h)+1/(b+e+f+g)+1/(b+e+f+h)+1/(b+e+g+h)+1/(b+f+g+h)+1/(c+
d+e+f)+1/(c+d+e+g)+1/(c+d+e+h)+1/(c+d+f+g)+1/(c+d+f+h)+1/(c+d+g+h)+1/(c+e+f+g)+1/(c+e+f+h)+1/(c+e+g+h)+1/(c+f+g
+h)+1/(d+e+f+g)+1/(d+e+f+h)+1/(d+e+g+h)+1/(d+f+g+h)+1/(e+f+g+h)} +
{1/(a+b+c+d+e)+1/(a+b+c+d+f)+1/(a+b+c+d+g)+1/(a+b+c+d+h)+1/(a+b+c+e+f)+1/(a+b+c+e+g)+1/(a+b+c+e+h)+1/(a+b+c+f+g
)+1/(a+b+c+f+h)+1/(a+b+c+g+h)+1/(a+b+d+e+f)+1/(a+b+d+e+g)+1/(a+b+d+e+h)+1/(a+b+d+f+g)+1/(a+b+d+f+h)+1/(a+b+d+g+
h)+1/(a+b+e+f+g)+1/(a+b+e+f+h)+1/(a+b+e+g+h)+1/(a+b+f+g+h)+1/(a+c+d+e+f)+1/(a+c+d+e+g)+1/(a+c+d+e+h)+1/(a+c+d+f
+g)+1/(a+c+d+f+h)+1/(a+c+d+g+h)+1/(a+c+e+f+g)+1/(a+c+e+f+h)+1/(a+c+e+g+h)+1/(a+c+f+g+h)+1/(a+d+e+f+g)+1/(a+d+e+
f+h)+1/(a+d+e+g+h)+1/(a+d+f+g+h)+1/(a+e+f+g+h)+1/(b+c+d+e+f)+1/(b+c+d+e+g)+1/(b+c+d+e+h)+1/(b+c+d+f+g)+1/(b+c+d
+f+h)+1/(b+c+d+g+h)+1/(b+c+e+f+g)+1/(b+c+e+f+h)+1/(b+c+e+g+h)+1/(b+c+f+g+h)+1/(b+d+e+f+g)+1/(b+d+e+f+h)+1/(b+d+
e+g+h)+1/(b+d+f+g+h)+1/(b+e+f+g+h)+1/(c+d+e+f+g)+1/(c+d+e+f+h)+1/(c+d+e+g+h)+1/(c+d+f+g+h)+1/(c+e+f+g+h)+1/(d+e
+f+g+h)} -
(続く) {1/(a+b+c+d+e+f)+1/(a+b+c+d+e+g)+1/(a+b+c+d+e+h)+1/(a+b+c+d+f+g)+1/(a+b+c+d+f+h)+1/(a+b+c+d+g+h)+1/(a+b+c+e+f+g
)+1/(a+b+c+e+f+h)+1/(a+b+c+e+g+h)+1/(a+b+c+f+g+h)+1/(a+b+d+e+f+g)+1/(a+b+d+e+f+h)+1/(a+b+d+e+g+h)+1/(a+b+d+f+g+
h)+1/(a+b+e+f+g+h)+1/(a+c+d+e+f+g)+1/(a+c+d+e+f+h)+1/(a+c+d+e+g+h)+1/(a+c+d+f+g+h)+1/(a+c+e+f+g+h)+1/(a+d+e+f+g
+h)+1/(b+c+d+e+f+g)+1/(b+c+d+e+f+h)+1/(b+c+d+e+g+h)+1/(b+c+d+f+g+h)+1/(b+c+e+f+g+h)+1/(b+d+e+f+g+h)+1/(c+d+e+f+
g+h)} +
{1/(a+b+c+d+e+f+g)+1/(a+b+c+d+e+f+h)+1/(a+b+c+d+e+g+h)+1/(a+b+c+d+f+g+h)+1/(a+b+c+e+f+g+h)+1/(a+b+d+e+f+g+h)+1/
(a+c+d+e+f+g+h)+1/(b+c+d+e+f+g+h)} - 1/(a+b+c+d+e+f+g+h) 北里大学医学部の出身で九大の第2外科入局で最後は先端医工学診療部の准教授でした！現在はとても頭の良い福岡歯科大学病院の内視鏡センターの教授先生ですよ！因みにピッツバーグに留学もしてました！https://i.imgur.com/zCrnEKb.jpg ド底辺シリツ医大は卒の言い分をご覧ください。
東京医大の事件で点数加算の不正まで発覚しているのに、
>裏？
>そんなのあるかよばか
だそうです。
http://imagizer.imageshack.com/img924/4761/OuxS6x.jpg ド底辺シリツ医大は卒の言い分をご覧ください。
東京医大の事件で点数加算の不正まで発覚しているのに、
>裏？
>そんなのあるかよばか
だそうです。
http://imagizer.imageshack.com/img924/4761/OuxS6x.jpg ド底辺シリツ医大卒の言い分をご覧ください。
東京医大の事件で点数加算の不正まで発覚しているのに、
>裏？
>そんなのあるかよばか
だそうです。
http://imagizer.imageshack.com/img924/4761/OuxS6x.jpg おーい、ド底辺！
宿題が残っているぞ！！
ド底辺シリツ医はpulseless VTにcardioversionしないで何するんだい？
私立医三年生の正答率ほぼ100％なんだろ？
ド底辺シリツ医大卒の馬鹿の証。
馬鹿すぎwww
だってプププ
http://imagizer.imageshack.com/img922/2025/fiDLdf.png >>65
Prelude> n=(10^19-1) `div` 9
Prelude> [m | m <- [2..floor.sqrt.fromIntegral $ n], n `mod` m ==0 ] import Data.List
divisor n = find (\m -> n `mod` m ==0 )[2..floor.sqrt.fromIntegral $ n]
main = do
print $ divisor $ (10^19-1) `div` 9 Prelude> :load "notPrime.hs"
[1 of 1] Compiling Main ( notPrime.hs, interpreted )
Ok, one module loaded.
*Main> :main
さて、明日の朝までに終わるかなぁ *Main> divisor 1111111111111111111111111
Just 41
素数でないと最初の約数が返ってくるから、バクなく動作していると思う。 *Main> divisor 11111111111
Just 21649 >>69
終了していた
GHCi, version 8.4.3: http://www.haskell.org/ghc/ :? for help
Prelude> :cd C:\Users\kinen\Desktop
Prelude> :load "notPrime.hs"
[1 of 1] Compiling Main ( notPrime.hs, interpreted )
Ok, one module loaded.
*Main> :main
Nothing
素数と確定できて( ・∀・)ｲｲ!! >>72
Rのパッケージgmpのisprimeだと誤判定する。 http://i.imgur.com/zoyVkDv.jpg
Haskellのバックトラックで1行で解決、Cで書く気がなくなるな。
[(a,b,c) | a<-[0..9],b<-[0..9],c<-[0..9],100*a+10*b+c + 100*a+10*c+b + 100*b+10*a+c + 100*b+10*c+a + 100*c+10*a+b == 3123]
[(3,7,8)] 中学入試って難しいなl
５０個の○が円形に並んでいます。
図のように、まず１つの○に色をぬり、
次にその●から時計回りに６個進んで止まり、そこにある○をぬります。
さらにその●から
時計回りに６個進んで止まり、
そこにある○をぬり、以下同じ作業を くり返していきます。
すでに色がぬられた●に止まったときに終了とするとき、
何個の○をぬることができますか？
http://jukensansu.cocolog-nifty.com/photos/uncategorized/2018/06/02/6021.png
６の倍数と５０の剰余系を使ってHaskellに数えさせよう
length $ takeWhile (\x -> x*6 `mod` 50 /=0) [1..]
Prelude> length $ takeWhile (\x -> x*6 `mod` 50 /=0) [1..]
24
24回めでに戻るので25個塗れることがわかる。 おい、ド底辺、これを数えてみ！
１００万個の○が円形に並んでいます。
図のように、まず１つの○に色をぬり、
次にその●から時計回りに１０８個進んで止まり、そこにある○をぬります。
さらにその●から
時計回りに１０８個進んで止まり、
そこにある○をぬり、以下同じ作業を くり返していきます。
すでに色がぬられた●に止まったときに終了とするとき、
何個の○をぬることができますか？ >>74
解を持つような値を列挙
riddle n = [(a,b,c) | a<-[1..9],b<-[1..9],c<-[1..9],a/=b,b/=c,c/=a,100*a+10*b+c + 100*a+10*c+b + 100*b+10*a+c + 100*b+10*c+a + 100*c+10*a+b == n]
main = do
print $ filter (\x -> riddle x /= []) [1..9999]
[1011,1020,1101,1119,1133,1142,1200,1209,1255,1264,
中略
,4120,4138,4164,4173,4187,4205,4210,4237,4286,4295,4341,4350,4408,4417,4431,4449,4530,4539] >>77
４桁では
riddle n = [(a,b,c) | a<-[1..9],b<-[1..9],c<-[1..9],a/=b,b/=c,c/=a,100*a+10*b+c + 100*a+10*c+b + 100*b+10*a+c + 100*b+10*c+a + 100*c+10*a+b == n]
main = do
print $ length $ filter (\x -> riddle x /= []) [1..9999]
504個存在 *Main> riddle 4539
[(9,8,7)]
なので最大値が4539 事務員 とは？
同一者の別名として国試浪人、統計野郎、自称医科歯科、がある
自称医科歯科卒、実際は九州の駅弁国立出身で、卒業後は実家の東京に帰り国試浪人となり23年間経過、家庭教師バイトなどを経て現在は事務員、とされている
本人は、勤務医でたまに開業医の手伝いと内視鏡バイト、専門医なし、と主張しているが、連日連夜の異常な書き込み数の多さからは、勤務医とは考え難い
彼の職業がたとえ何であったとしても、人としてド底辺なことは間違いがない
自ら事務員であると告白したこともある
https://egg.5ch.net/test/read.cgi/hosp/1531459372/108-109
自作自演も頻繁に行なっている、内視鏡バイトの後はステーキハウスに行く妄想話がよく出てくる、実際には食べたこともないんだろうな
病名を挙げて架空の診療報告を行うこともあるが、今どきヒヨッコ研修医でもそんなことやらねーぞW
事務仕事の際に手にした他人の給与明細や同窓会費振込票を盗撮し、自分のものとしてアップロードしたこともある、犯罪なんじゃねーの？
統計絶対主義でマウントを取ろうとするが、大学卒業後の人生の大部分においてそれが何の役に立つのかはなはだ疑問である
統計に基づいた重病の治療成績を患者に説明しても、患者の希望する治療は患者の事情によって異なることは一定年数以上の臨床経験があるものなら誰でも知っていることだ
それが理解できない彼は、彼自身が素性を明らかにしているようなものである
コンプ薬屋同様に、私立医への執拗な誹謗中傷を数年余にわたって続けている
裏口批判をしているが、実際にそれが可能な資産家の子弟がいるであろう右派スレには近寄らない、一度書き込んだ形跡があったが指摘したら別人だと言って逃げた
弱いものが多そうなスレしか狙わないのもコンプ薬屋と共通する異常者の特徴である
劣等コンプレックスの塊なんだろうな
自分の主張に対して都合の悪い突込みが入ると、相手を私立医と決めつけて、さてはシリツだな、裏口バカ、というセリフでワンパターンに返すことが多い
国試問題を挙げて簡単だとほざいてますが、本番で通らなければお話になりません
いくらネットでわめいていても、医師国試の本番で通らなければお話になりません
大事なことなので２回言いました これのどこが告白だよ！
入試に国語のないド底辺シリツ医大の裏口バカならでのロジックだぜ
>>108
文京区の白山の開業医の実家で事務員しているらしいぞ、
ド底辺シリツ医大卒の裏口バカの作話に基づけば。 nを正の整数とする。2数の積
n×123456789
のすべての桁の数字が1となるようなnを考える。
（1）そのようなnを1つ求めよ。
これは流石に数字が大き過ぎるかな。 >>82
多分、計算終わらないだろうな。
import Data.List
find (floor $ logBase 10 123456789*9*n+1==123456789*9*n+1) [1..] n,kは自然数、pは素数で、2<n, 0<k<nである。
nCk=p!
となる(n,k,p)の組を全て決定せよ。 >>84
-- n,kは自然数、pは素数で、2<n, 0<k<nである。 nCk=p! となる(n,k,p)の組を全て決定せよ。
-- Haskellでプログラミングして書き出す
import Data.List
divisor n = find (\m -> n `mod` m ==0 )[2..floor.sqrt.fromIntegral $ n]
choose n r = product[1..n] `div` product[1..n-r] `div` product[1..r]
maxN=1000
main =do
print $ [(n,k,p) | n <- [2..maxN], k <- [1..(n-1)], p <-[2..maxN], divisor p == Nothing, choose n k == product[1..p]]
Prelude> :main
[(2,1,2),(4,2,3),(6,1,3),(6,5,3),(10,3,5),(10,7,5),(16,2,5),(16,14,5) 事務員 とは？
同一者の別名として国試浪人、統計野郎、自称医科歯科、がある
自称医科歯科卒、実際は九州の駅弁国立出身で、卒業後は実家の東京に帰り国試浪人となり23年間経過、家庭教師バイトなどを経て現在は事務員、とされている
本人は、勤務医でたまに開業医の手伝いと内視鏡バイト、専門医なし、と主張しているが、連日連夜の異常な書き込み数の多さからは、勤務医とは考え難い
彼の職業がたとえ何であったとしても、人としてド底辺なことは間違いがない
自ら事務員であると告白したこともある
https://egg.5ch.net/test/read.cgi/hosp/1531459372/108-109
自作自演も頻繁に行なっている、内視鏡バイトの後はステーキハウスに行く妄想話がよく出てくる、実際には食べたこともないんだろうな
病名を挙げて架空の診療報告を行うこともあるが、今どきヒヨッコ研修医でもそんなことやらねーぞW
事務仕事の際に手にした他人の給与明細や同窓会費振込票を盗撮し、自分のものとしてアップロードしたこともある、犯罪なんじゃねーの？
統計絶対主義でマウントを取ろうとするが、大学卒業後の人生の大部分においてそれが何の役に立つのかはなはだ疑問である
統計に基づいた重病の治療成績を患者に説明しても、患者の希望する治療は患者の事情によって異なることは一定年数以上の臨床経験があるものなら誰でも知っていることだ
それが理解できない彼は、彼自身が素性を明らかにしているようなものである
コンプ薬屋同様に、私立医への執拗な誹謗中傷を数年余にわたって続けている
裏口批判をしているが、実際にそれが可能な資産家の子弟がいるであろう右派スレには近寄らない、一度書き込んだ形跡があったが指摘したら別人だと言って逃げた
弱いものが多そうなスレしか狙わないのもコンプ薬屋と共通する異常者の特徴である
劣等コンプレックスの塊なんだろうな
自分の主張に対して都合の悪い突込みが入ると、相手を私立医と決めつけて、さてはシリツだな、裏口バカ、というセリフでワンパターンに返すことが多い
国試問題を挙げて簡単だとほざいてますが、本番で通らなければお話になりません
いくらネットでわめいていても、医師国試の本番で通らなければお話になりません
大事なことなので２回言いました 0940 卵の名無しさん 2018/10/07 14:53:55
>>508 にあった耳鼻科ヤバいなw
顔出しして金沢医科大卒て書いちゃうとか恥ずかしくないの？
馬鹿な患者相手にしてるから気にならんのか本人がアレ過ぎて恥ずかしいド底辺シリツな事に気付いてないのか
http://www.murakami-ent.com/greeting.html >>87
学歴ロンダより正直ではある。
卒業大学すらな言えないこのスレの裏口バカよりマシじゃね。
人には勧めないけど。 m,nを自然数とする。
m^n-mn=n^m
を満たすm,nは存在しないことを示せ。
1000までやってみた。
maxMN=1000
main = do
print $ [(m,n)| m <-[1..maxMN],n<-[1..maxMN],m^n-n^m==m*n]
Prelude> :main
[] {-
pが素数、m,nが自然数のとき
p^m+1=m^nを満たす(p,m,n)の組み合わせを一つ求めよ
-}
isprime n = all (\m -> n `mod` m /=0 )[2..floor.sqrt.fromIntegral $ n]
mAx=100
main = do
print $ [(p,m,n)| p<-[2..mAx],m<-[1..mAx],n<-[1..mAx],p^m+1==m^n] 2015の階乗を10の502乗で割った数の一の位は？ >>91
1153で始まる5284桁になるな。
おい、ド底辺掛け算と割り算くらいできるだろ
下４桁を答えてみ！ 1153695229068993700894415022682284743714582512084074130079487479927686223649720400587236401668893673546449455071916009317
5479895774351383782211721410325759717835249680904640101615890067804536468156681135699419586145284897444844215931729090061
9276701087083481819733352374631825845179239608203521963370469778798655040523908158307088534117801484433855443444487042528
9028392392317907435619142161469891691545420967622836555152811095137401703664660333211337325672145638641240549253673666242
9244698886840754406167110922210303304137505782272359403619603386517176337439072664677731028273860228351373427589901777801
8412166640211948247795609376465734737292890369061260536405240994576287885399967394247575182112935500028847881468029909419
4681631665853856766041917932454613064597446205566634125159650443927045923260459102681775732561648621501123538285360427306
7705760478632460767269290326859748006626809016420096345535167255926693077263753206853596436958326018263076035404777311959
7543028263098960543550834379248505786891007483281143235057398632432748526035299093156748642932622962492743854135029343638
3916593204107063904912461380634113370665920430430310742916810705011406812974665285397124768245283019655682096522086081574
6949793873442765360574453628448503618200156089265199045203470288671212639530039345884327078626996903884237395682362994851
8478132441910527466322494035533117081578339008141728379987378372881672519289635581504066700801249767705475073199007945198
2258848589256393946784301896135465110652940658875717886226214744267796121253014557567610592510942751431718837970108234299
1651546084349396016096011016086057962062265773771153690559861305089231969972890432575560608923216028399156207530875796122
7817958685541515372842756991833291209711639932686072834828150397570870388140189810341016533589875096884681310830599743463 8291380419299096611557532326140921852784528648038974413077871506859704307286363613221534230640122711072639519553854577718
0802307548239522788602231058943123688035226255668737212745391478077656957218053858891918580779539398885519402963162874701
9916490354212444132161669619060556319031141470123934212657297854180451716722792985096525757902480609221762198572573058190
0022216330757178695487954370949707764913391062120328089655733173084918124851900344386098837354022312059851779067629316598
0382306062621756728187853676583051048757607501399699586128570829005645503264993162730522767549542833549686946488446498448
0618448932846495291322368602175461529026770552601130122277441507064208736413756905327688077144298020654998417781391743824
8396599117047161787386419848976692286295963726560690258076828463641626153169408067967441732857200253899752768095192271439
7820144509314442039822158651517414373752346666113565176927181239573344433450060260286579277180250052657673281534937181131
4111144860392015610341061617516110587536661901231551224763616058860978398289719500018366469005280818679551951033630777294
9503335226384845894694296798574500223312371153011246094883211428746722632574217817166653225019644243614469339937779378419
7344974741214982027070446397309225539289043516642662837704421588114654532031372161841990359942102032574844186945384278676
8046927882286618931773591599224917454457585360600810492825392667626032053020867147961969144935045091273466328487783110549
0532582748627620564386380656219724829757417895216946161666209798591707959029435365714357550921593967846456859330814511831
3166540778881794752767439424918881378984700469183202267868197309862846173480042640630998691020429013967802020335402478709
2477166920553508024891143202853214708993620085115680821304240024314639591092709134829775035778833828805252312824477119408 0412507189912869301473220509509596395729256608032658521794642583119750318496256818984389121286890016312772444419571335238
1924727956185993116238917117243570589074956108182267749306498133244506990780219838852279971724570816946399206523186589095
9207121448302284194907053812167039756636086454304214171374570417869047045556391154948032248715904212754063690862344075520
1198964238821652449774619102116493165118731591234469371719987127228913244267746065790058079330132171534959835286660496993
4556290113041577929798997188904669320917101092551756861005753587962092842232044581096349434301978908151895858121743806968
7962087294653460173512919489111632859893193699707342607286071181722228407222356195934998504620807637622565251163697701085
7141888936266736202180727942558584462461048890393328699608653220548634164824343093427773790142158993164004401802644320484
9045920278327146544867045485435242233786875754337885927437738134362789129694469327155145847181917756181831192951560161596
4801165960997618245365134274621746736667143037451282152648720978050059469359856367708802554103654692972008687502711154665
0290624119050081723297426213918626055425897952847229739166463101537052884277416524558648105110787513594429538271842458933
0833372509109890202709564421924226046738327714108255521699173511019381198908084949271512335560062005647564586759562402974
5021213128601203305484044029796755845690570160524639799149430835456623779080666595021097627708247249823623847309277176776
6340304689464576025877609138909024746177806543045711961104364181337959272634540154056165935066273240020181391110836381712
02344852451923276483349836800825214200204493396442400276135978851672506786801****
お～い、ド底辺、途中まで書いてやったぞ、
あとは最後の４桁だけ。
掛け算くらいできるんだろ？？ 高校２年の女子生徒（１６）に現金を渡してわいせつな行為をしたとして、警視庁少年育成課は児童買春・ポルノ禁止法違反（児童買春）容疑で、東京都板橋区仲宿、医師、小高健三容疑者（４０）を逮捕した。容疑を認めている。
逮捕容疑は６月１４日、新宿区歌舞伎町のホテルで、女子生徒が１８歳未満と知りながら、現金２万円を渡してわいせつな行為をしたとしている。
同課によると、小高容疑者は、制服姿の女性らがマッサージなどのサービスをする無店舗型ＪＫリフレ店を利用。小高容疑者は女子生徒に医師の身分を明かした上で、「裏オプション」として性的なサービスを要求し「次は学校の制服をもってきてほしい」と伝えていた。
店側は短文投稿サイト「ツイッター」などで顧客を募集。今年６月に同店の経営者が児童福祉法違反容疑で逮捕されており、顧客名簿から小高容疑者が浮上した。
https://www.sankei.com/smp/affairs/news/181011/afr1810110014-s1.html 知り合いから教えてもらった自宅で稼げる方法
興味がある人はどうぞ
みんながんばろうねぇ『羽山のサユレイザ』で
2W2 ニュー速にこんな投稿があったｗ
115名無しさん＠恐縮です2018/09/09(日) 15:16:26.51ID:qs+PYvzT0
聖マリアンナなんてF欄の卒業生になんか診られたく無いよな。
ある評論家が開業医は卒業証書を飾れって言ってたけど…
俺もそう思ったけど…近くのやぶ医者で有名な病院長が
慶応の医学部の卒業証書を飾っていた。 こういう報道があるといつもさてはシリツだな？と思って条件反射で検索してしまうな。
高校２年の女子生徒（１６）に現金を渡してわいせつな行為をしたとして、警視庁少年育成課は児童買春・ポルノ禁止法違反（児童買春）容疑で、東京都板橋区仲宿、医師、小高健三容疑者（４０）を逮捕した。容疑を認めている。
逮捕容疑は６月１４日、新宿区歌舞伎町のホテルで、女子生徒が１８歳未満と知りながら、現金２万円を渡してわいせつな行為をしたとしている。
同課によると、小高容疑者は、制服姿の女性らがマッサージなどのサービスをする無店舗型ＪＫリフレ店を利用。小高容疑者は女子生徒に医師の身分を明かした上で、「裏オプション」として性的なサービスを要求し「次は学校の制服をもってきてほしい」と伝えていた。
店側は短文投稿サイト「ツイッター」などで顧客を募集。今年６月に同店の経営者が児童福祉法違反容疑で逮捕されており、顧客名簿から小高容疑者が浮上した。
https://www.sankei.com/smp/affairs/news/181011/afr1810110014-s1.html ド底辺シリツ医大卒って医療従事者にマウントするのは不可能だから事務員や国試浪人認定するしかないんだなぁ。
こういうのにサクッと答えてド底辺シリツ医大卒でも高卒の基礎学力くらいあるのを示せばいいのに。
ある医大で合格率の男女比が1.2で男子優位という結果だったという。
定員100で男子800人女子200人が受験して合格率の男女比が
1.2であったときに統計的には有意差があると言えるか？
やはり、ド底辺シリツ医大卒には答が出せないようだなぁ。 Rで数えると
f <- function(ratio=1.2,man=800,woman=200,pass=100){
total=man+woman
i=0:pass
sum((choose(man,i)*choose(woman,pass-i)/choose(total,pass))*(i/man > ratio*(pass-i)/woman))
}
f()
Haskellで数えると
ratio=1.2
pass=100
man=800
woman=200
total=man+woman
ii=[0..pass]
male_fem i= if r < ratio then 0 else p
where a = (choose man i)*(choose woman (pass-i))
b = choose total pass
m=fromIntegral i/ fromIntegral man
w=fromIntegral (pass-i)/fromIntegral woman
r = m/w
p = (fromIntegral a) / (fromIntegral b)
main = do
print $ sum ( map male_fem ii) 一行抜けてた。
choose n r = [1..n] `div` [1..n-r] `div` [1..r]
ratio=1.2
pass=100
man=800
woman=200
total=man+woman
ii=[0..pass]
male_fem i= if r < ratio then 0 else p
where a = (choose man i)*(choose woman (pass-i))
b = choose total pass
m=fromIntegral i/ fromIntegral man
w=fromIntegral (pass-i)/fromIntegral woman
r = m/w
p = (fromIntegral a) / (fromIntegral b)
main = do
print $ sum ( map male_fem ii) f <- function(ratio=1.2,wm=0.2,total=1000,pass=100){
woman=total*wm
man=total-woman
i=0:pass
sum((choose(man,i)*choose(woman,pass-i)/choose(total,pass))*(i/man > ratio*(pass-i)/woman))
}
f()
r=seq(1,3,length=1000)
p=sapply(r,f)
plot(r,p,pch=19,type='n',bty='l',xlab='M/F ratio',ylab='probability')
abline(h=0.01,lty=3)
g <- function(wm) lines(r,sapply(r,function(r)f(r,wm)),col=10*wm,lwd=10*wm)
for(i in 1:5/10) g(i)
legend('center',bty='n',lwd=1:5,col=1:5,
legend=c('10%','20%','30%','40%','50%'))
woman=200
man=800
total=woman+man
pass=100
x=rep(0:1,c(woman,man))
sim <- function(ratio=1.2){
y=sample(x,pass)
M=sum(y)/man
W=(pass-sum(y))/woman
M/W>=ratio
}
re=replicate(1e3,mean(replicate(1e3,sim(1.2))))
f(1.2) > summary(re)
Min. 1st Qu. Median Mean 3rd Qu. Max.
0.2180 0.2490 0.2585 0.2591 0.2690 0.3020
> f(1.2)
[1] 0.2590177 > re=replicate(1e4,mean(replicate(1e3,sim(1.2))))
> summary(re)
Min. 1st Qu. Median Mean 3rd Qu. Max.
0.2020 0.2500 0.2590 0.2589 0.2680 0.3170
> f(1.2)
[1] 0.2590177 > re=replicate(1e4,mean(replicate(1e4,sim(1.2))))
> summary(re)
Min. 1st Qu. Median Mean 3rd Qu. Max.
0.2445 0.2559 0.2588 0.2589 0.2619 0.2739
> f(1.2)
[1] 0.2590177 > f(1.2)
[1] 0.2590177
> re=replicate(1e4,mean(replicate(1e4,sim(1.2))))
> summary(re)
Min. 1st Qu. Median Mean 3rd Qu. Max.
0.2428 0.2561 0.2590 0.2590 0.2620 0.2754 >>109
裏口入学が判明しても除籍しないのだからその通り。
裏口学生だらけだからシリツ医大生は誰も問題にしないらしいね。 >>111
ド底辺シリツ医大卒の言い分をご覧ください。
東京医大の事件で点数加算の不正まで発覚しているのに、
>裏？
>そんなのあるかよばか
だそうです。
http://imagizer.imageshack.com/img924/4761/OuxS6x.jpg >>111
点数改竄で不正入学の学生が除籍にならず
裏口入学（後に勝手口入学と換言）と公言するのが
私立医大と確定だよなぁ。 これは正論
34 名無しさん＠１周年 2018/10/15(月) 16:51:53.32 ID:DyM4V+lX0
常識的に考えて私立の医大にゲタはかせないと受からないヤツが
医者をやるべきではないと思うのだが You have to sleep with one eye open for the rest of your life. 医学部卒の全員が教授や病院長になれるわけはなく、ライフモデルの基本は、
研究者か、勤務医か、開業医であり、そのモデルケースは、
①大学院⇒研究職（出身校の講師や准教授）
⇒基幹病院副院長とか名誉職
（副院長は5人とかいる）
②関連病院医員⇒部長職
⇒健診医とか（勤務週2で部長より給与良かったり…）
こういうルートって地元国立医にしかない。
都内のこういうルートは東大か慶応ってこと。
あと、私立医研究職は正直キツイと思われ。
私立分院のヒラ医員～講師までの給与・待遇は
一般病院より相当悪い（知ってる人は知ってると思うが）。
その苦行に耐えた一握りが
主任教授になれる。国公立医には、大学講師⇒基幹病院部長という王道ルートがあるが、
私立医にはそれがない、
また、新設私立では准教授以上は天下り枠。
（東大⇒帝京・女子医など、慶応⇒杏林など）
結局、目指すところは
旧帝医か慶応医なら・・・何にでも成れる
国公立医なら・・・出身校教官か、基幹病院部長か、地元開業か
旧設私立なら・・・出身校教官（主任教授以外おいしくない）か、一般病院勤務医か、地元開業か、
新設私立なら・・・出身校万年講師か、一般病医院勤務医か、地元開業か（←大抵早期にこれ）
「医者になったら国立も私立も一緒」、そんなわけがない。それは幻想です。 >>116
基幹病院の部長職⇒健診医っているね。
何が楽しいのだかと思う。 >>117 私立医のバカが教育すると更に馬鹿になる >>119
中学の一次方程式での比率計算すらできないバカを
医者にするド底辺シリツ医大のシステムは素晴らしいなぁｗｗｗｗ
http://imagizer.imageshack.com/img923/2715/RosCsf.jpg
何度読んでも馬鹿すぎる。
悪いのが自分の頭と気付いていない。 >>111
そこで専門医制度ですよ。
病院のHpに卒業大学名は恥ずかしいので載せずに
卒業年度と専門医の有無のみ掲載する。
言わば裏技みたいなものです（笑）。 数学板の質問スレに久々に俺でも答が出せる問題が投稿された。
まあ、正七角形の対角線の長さが直接求まらないというのからして間違いだが。
784 １３２人目の素数さん sage 2018/10/15(月) 17:39:15.65 ID:7e+ZqB9F
半径1の円に内接する正七角形の対角線の長さの総和を求めよという問題が分かりません。
正七角形の対角線の長さが直接求まらないのでどう工夫したらいいでしょうか。 >>121
東京医大の事件でシリツなら裏口入学を疑うという
知恵が広まったから隠すと余計に怪しまれる。
中学数学もできないようなのはまあ、裏口だろうな。 >卒業大学名は恥ずかしいので載せず
母校に誇りはないのｗ 大学は精神的におかしな奴は入学させない 面接で一発でわかる >>122
一般化して正ｎ角形の対角線の長さを計算して図示するスクリプトを書いてみた。
DOP <- function(n,print=FALSE,...){ # diagonal length of plygon
q=2*pi/n
r=cos(q)+1i*sin(q)
p=numeric(n+1)
for(i in 1:(n+1)) p[i]=r^(i-1)
D=NULL
if(n>3){
for(j in 3:(2+ceiling(n-3)/2)){
D= append(D,abs(p[1]-p[j])/abs(p[1]-p[2]))
}
}
if(print){
plot(p,type='l',bty='l',axes=FALSE,ann=FALSE,lwd=2)
for(i in 3:(n-1)) segments(1,0,Re(p[i]),Im(p[i]),...)
}
return(D)
}
正１７面形だと
> DOP(17,print=TRUE,col=sample(colours(),1))
[1] 1.965946 2.864944 3.666380 4.342962 4.871650 5.234439 5.418976
http://i.imgur.com/HDwWx6z.png >>125
シリツだと裏口を不正と思わない精神的に腐りきっているヤシを入学させてんじゃないの？
東京医大の当事者の学生も不正が発覚しても自主退学してないだろ。 西宮市の甲陽学院高校 64回生 多田仁彦医師(阪大・医学部出身)
（大阪府和泉市 府中病院の麻酔科医長を解雇済み）が経営する
西宮市 苦楽園口駅近くのバーアルフェッカの電話番号→0798-71-5135
多田仁彦医師の携帯番号→
090-7109-1478
多田仁彦医師からの「殺人未遂事件」「殺人未遂事件」「殺人未遂事件」の
被害者で元宝塚ジェンヌ 入江美穂さんの携帯番号→
080-9124-0605
皆さんで殺人未遂事件の被害者 元宝塚ジェンヌの入江美穂さんを助けましょう！ 高須克弥
✔
@katsuyatakasu
僕も裏口入学だよ。母子家庭の開業医で父親が卒業生で一次試験の成績がよかったので、
二次試験は死んだ父親をよく知っている教授が担当してくれて世間話だけ。入学金も半額に負けてくれた。
昭和医大は人情のわかる素晴らしい大学だった。
何が悪い。
裏口私立医ｗ >>131
バグ修正後
http://tpcg.io/18pVOx
ついでに１辺の長さがでるようにしてみた。
DOPs <- function(n,print=FALSE,...){ # diagonal length of plygon
q=2*pi/n
r=cos(q)+1i*sin(q)
p=numeric(n+1)
for(i in 1:(n+1)) p[i]=r^(i-1)
side=abs(p[1]-p[2])
D=NULL
if(n>3){
for(j in 3:(n%/%2+1)){
D= append(D,abs(p[1]-p[j]))
}
}
if(print){
plot(p,type='l',bty='l',axes=FALSE,ann=FALSE,lwd=2)
for(i in 3:(n-1)) segments(1,0,Re(p[i]),Im(p[i]),...)
}
return(list(side=side,diagonal=D))
}
DOPs(7,print=TRUE,col='purple',asp=1) >>130
事務員扱いしてたのじゃなかったっけ？言ってることが統合失調！
まあ、ド底辺シリツ医大卒ならさもありなん。
事務員認定したがっている統計解析では都外の底辺シリツと推測されているが、
ド底辺スレでは聖魔と断定する投稿があったが、まあ、妥当な線だろうな。
これであっているのか？
66 卵の名無しさん sage 2018/10/08(月) 09:22:57.88 ID:mQHuWxdH
ド底辺聖マ卒 頭悪すぎ 正１７角形で
> DOPs(17,print=TRUE,col=sample(colours(),1),asp=1)
$`side`
[1] 0.367499
$diagonal
[1] 0.7224833 1.0528643 1.3473913 1.5960345 1.7903266 1.9236513
[7] 1.9914684
おい、ド底辺作図して検証してみてくれ。
ド底辺シリツ医大卒の頭脳じゃ作図すら無理かな。 >>136
これであっているのか？
66 卵の名無しさん sage 2018/10/08(月) 09:22:57.88 ID:mQHuWxdH
ド底辺聖マ卒 頭悪すぎ グラフ化しないなら
dops <- function(n){
i=1:(n%/%2)
2*sin(i*pi/n)
}
でいいな。
> dops(17)
[1] 0.3674990 0.7224833 1.0528643 1.3473913 1.5960345
[6] 1.7903266 1.9236513 1.9914684 >>138
これであっているのか？
66 卵の名無しさん sage 2018/10/08(月) 09:22:57.88 ID:mQHuWxdH
ド底辺聖マ卒 頭悪すぎ
やっぱり、これ？
>121の指摘どおり
卒業大学名は恥ずかしい クラスター分析のRパッケージを使う機会があったので
シリツ医大の学費と偏差値のデータhttp://2chreport.net/rank_01.htmに使ってみた。
バカほど金が掛かかるグラフは既出だが
http://i.imgur.com/XGJgjDH.png
学費（寄付金含まず）の分布が分かれているようにもみえる。
クラスター分析してみた。
http://i.imgur.com/b6LB25t.png
偏差値との関係でも二峰性になるかもグラフ化してみた。
http://i.imgur.com/3vPkt8N.png
見下ろすとこんな感じ。
http://i.imgur.com/casnaF7.png >>141
そうよ。
ド底辺シリツ医大卒のスティグマは一生続くのよ。
当事者の発言をみてみましょう。
>でも一生、卒業大学を隠すのは本当に辛い
だそうです。
http://imagizer.imageshack.com/img922/6510/c71CG3.jpg >>141
これであっているのか？
66 卵の名無しさん sage 2018/10/08(月) 09:22:57.88 ID:mQHuWxdH
ド底辺聖マ卒 頭悪すぎ
卒業大学も忘れるほど、認知症が進んでる？
いや、それ以前に知恵遅れ？？ >>141
そういえば中学数学の一次方程式の比率計算のできない底辺シリツ医大卒がいたが
おまえも、裏口入学だと思うだろ？
これが現実 １次方程式もできないド底辺シリツ医大卒の記録
http://imagizer.imageshack.com/img923/2715/RosCsf.jpg >>145
これであっているのか？
66 卵の名無しさん sage 2018/10/08(月) 09:22:57.88 ID:mQHuWxdH
ド底辺聖マ卒 頭悪すぎ >>148
中学数学もできない馬鹿だと周りも大変だろ？
んで、あんたどこ卒？
これに答えられない馬鹿だと患者も大変だぞ。
はよ、答えてみ。
66 卵の名無しさん sage 2018/10/08(月) 09:22:57.88 ID:mQHuWxdH
ド底辺聖マ卒 頭悪すぎ
という意見がでてるぞ。 >>149
それどころか、ナマポも避けたがるのがド底辺シリツ医大卒
ナマポの症例報告です。
実例↓
517 卵の名無しさん 2018/02/25(日) 11:36:00.56 ID:gq76tAvs
福岡のあの歯科大かな？
歯科口腔外科で抜歯依頼したら爺ちゃんが〇〇歯科大卒の先生は避けて下さいねがあった
けど。
この爺ちゃん、聖マリ卒の先生もよけて下さいと初診時に言ってた札付き爺さん。
生保受給者のくせにね。 >>149
やっぱり、ナマポも名指しで避けるところ？
これ？
66 卵の名無しさん sage 2018/10/08(月) 09:22:57.88 ID:mQHuWxdH
ド底辺聖マ卒 頭悪すぎ >>153
んで、あんたどこ卒？
これに答えられない馬鹿だと患者も大変だぞ。
はよ、答えてみ。
66 卵の名無しさん sage 2018/10/08(月) 09:22:57.88 ID:mQHuWxdH
ド底辺聖マ卒 頭悪すぎ
という意見がでてるぞ。 >>156
卒業大学すら即答できないド底辺シリツ医大卒って悲しくない？ >>158
んで、あんたどこ卒？
これに答えられない馬鹿だと患者も大変だぞ。
はよ、答えてみ。
66 卵の名無しさん sage 2018/10/08(月) 09:22:57.88 ID:mQHuWxdH
ド底辺聖マ卒 頭悪すぎ
という意見がでてるぞ。 別スレにこんな記述が
431 卵の名無しさん 2018/10/16(火) 17:16:04.21 ID:y//B5I3Q
私立出の医者はサナダムシより気持ち悪い
馬鹿な上、卑怯卑劣、犬畜生以下のジメジメしたナメクジみたいな陰湿粘着質な生物 女性ってかわいいよな やっぱ人柄が大事だってさ 非常識な人はアウトだってw >>162
ド底辺シリツ医大進学を選択するような非常識はアウトだよね。
東大卒の才媛もこう語っているよ。
大きな声で職場での読み上げろよ！
http://ishikisoku.com/wp-content/uploads/2016/12/SQIR26V.jpg さて
彼女とイチャイチャしながら
サッカーでもみるか
日本頑張れ！ >>165
>>158
んで、あんたどこ卒？
これに答えられない馬鹿だと患者も大変だぞ。
はよ、答えてみ。
66 卵の名無しさん sage 2018/10/08(月) 09:22:57.88 ID:mQHuWxdH
ド底辺聖マ卒 頭悪すぎ
という意見がでてるぞ。 サッカー日本代表 ウルグアイ戦 勝利！
彼女と一緒に興奮するゲームでした
そして試合終了後 いつものムフフになった
気持ちよかったな～ >>167
>>165
>>158
出身校も言えないような奴って気持ち悪いぞ。
んで、あんたどこ卒？
これに答えられない馬鹿だと患者も大変だぞ。
はよ、答えてみ。
66 卵の名無しさん sage 2018/10/08(月) 09:22:57.88 ID:mQHuWxdH
ド底辺聖マ卒 頭悪すぎ
という意見がでてるぞ。 >>168
>>149
やっぱり、ナマポも名指しで避けるところ？
これ？
66 卵の名無しさん sage 2018/10/08(月) 09:22:57.88 ID:mQHuWxdH
ド底辺聖マ卒 頭悪すぎ >>168
彼女もこれに賛同だよな！？
431 卵の名無しさん 2018/10/16(火) 17:16:04.21 ID:y//B5I3Q
私立出の医者はサナダムシより気持ち悪い
馬鹿な上、卑怯卑劣、犬畜生以下のジメジメしたナメクジみたいな陰湿粘着質な生物
http://egg.2ch.net/test/read.cgi/hosp/1531913843/431 おい、ド底辺。
今日は職場で
東大卒の才媛のお言葉を大きな声で職場での読み上げろよ！
http://ishikisoku.com/wp-content/uploads/2016/12/SQIR26V.jpg
ついでにこれも唱えろよ。
英文が言えたら見直されるかもしれんぞ！
Last but not least, three laws of Do-Teihen(lowest-tier) Medical School, currently called Gachi'Ura by its graduates.
最後にド底辺医大の三法則を掲げましょう。
1: It is not the bottom medical school but its enrollee that is despicable, which deserves to be called a bona fide moron beyond redemption.
ド底辺シリツ医大が悪いのではない、本人の頭が悪いんだ。
2: The graduates of Do-Teihen are so ashamed that none of them dare to mention their own alma mater they had gone through.
ド底辺シリツ医大卒は恥ずかしくて、学校名を皆さま言いません。
3: The Do-Teihen graduates are so ashamed of having bought their way into the exclusively lowest-tier medical school
that they tend to call a genuine doctor a charlatan who elucidates their imbecility.
ド底辺特殊シリツ医大卒は裏口入学の負い目から裏口馬鹿を暴く人間を偽医者扱いしたがる。 あれ～
今日は事務員うりゅう？さんと戦う裏口肯定私立医は？ 西宮市の甲陽学院高校 64回生 多田仁彦医師(阪大・医学部出身)
（大阪府和泉市 府中病院の麻酔科医長を解雇済み）が経営する
西宮市 苦楽園口駅近くのバーアルフェッカの電話番号→0798-71-5135
多田仁彦医師の携帯番号→
090-7109-1478
多田仁彦医師からの「殺人未遂事件」「殺人未遂事件」「殺人未遂事件」の
被害者で元宝塚ジェンヌ 入江美穂さんの携帯番号→
080-9124-0605
皆さんで殺人未遂事件の被害者 元宝塚ジェンヌの入江美穂さんを助けましょう！ 西宮市の甲陽学院高校 64回生 多田仁彦医師(阪大・医学部出身)
（大阪府和泉市 府中病院の麻酔科医長を解雇済み）が経営する
西宮市 苦楽園口駅近くのバーアルフェッカの電話番号→0798-71-5135
多田仁彦医師の携帯番号→
090-7109-1478
多田仁彦医師からの「殺人未遂事件」「殺人未遂事件」「殺人未遂事件」の
被害者で元宝塚ジェンヌ 入江美穂さんの携帯番号→
080-9124-0605
皆さんで殺人未遂事件の被害者 元宝塚ジェンヌの入江美穂さんを助けましょう！ >173
悪いが俺は事務員じゃないのよ。
自分も含めた国立卒の医師の気持ちを明言しているだけ。
開業医スレのこれが秀逸総括
> 私立医が予想通り糞だからしょうがないわな
> まあ、馬鹿に馬鹿と言っちゃ嫌われるのは摂理
> リアルでは皆思ってるだけで口に出してないだけよ
>
暴走族のヤンキーに俺のダチだぜ、と言われたくないのと同じく
ド底辺シリツ医大卒に同業者ですと言われたくないよねｗ
今日は内視鏡の待機時間ができたから内視鏡スレに投稿してきた。 このスレのド底辺シリツ医大卒が唱える第一法則は修正が必要だな。
1: It is not the bottom medical school but its enrollee that is despicable, which deserves to be called a bona fide moron beyond redemption.
ド底辺シリツ医大が悪いのではない、本人の頭が悪いんだ。
から
ド底辺シリツ医大が悪いのではない、私の頭が悪いんだ。
ここで問題。
ド底辺シリツ医大が悪いのではない、私の頭が悪いんだ
に合致するように英文を修正せよ。
おい、ド底辺、裏口バカでも英語くらいできるのを示すチャンスだぞ。 名優・えなり「私立医は裏口入学ばかり」
超ヒット作・コードブルー「私立医は裏口馬鹿ばかり」
私立医・高須先生 「俺も裏口 私立医は裏口ばかり 何が悪い」
爆問・太田 「私立医は銭払う裏口ばかり」 国試対策 5周終了 あとは弱点補強と維持になる
油断はできない 何度も繰り返さないとな イヤーノートがボロボロになってきた よく頑張ったなとしみじみ思う >>179
>>165
>>158
んで、あんたどこの医大？
これに答えられない馬鹿だと患者も大変だぞ。
はよ、答えてみ。
66 卵の名無しさん sage 2018/10/08(月) 09:22:57.88 ID:mQHuWxdH
ド底辺聖マ卒 頭悪すぎ
という意見がでてるぞ。 >>180
これに賛同だよな！？
431 卵の名無しさん 2018/10/16(火) 17:16:04.21 ID:y//B5I3Q
私立出の医者はサナダムシより気持ち悪い
馬鹿な上、卑怯卑劣、犬畜生以下のジメジメしたナメクジみたいな陰湿粘着質な生物
http://egg.2ch.net/test/read.cgi/hosp/1531913843/431 >>180
このスレのド底辺シリツ医大卒が唱える第一法則は修正が必要だな。
1: It is not the bottom medical school but its enrollee that is despicable, which deserves to be called a bona fide moron beyond redemption.
ド底辺シリツ医大が悪いのではない、本人の頭が悪いんだ。
から
ド底辺シリツ医大が悪いのではない、私の頭が悪いんだ。
ここで問題。
ド底辺シリツ医大が悪いのではない、私の頭が悪いんだ
に合致するように英文を修正せよ。
おい、ド底辺、裏口バカでも英語くらいできるのを示すチャンスだぞ。 >>184
>>179
>>165
>>158
んで、あんたどこの医大？
これに答えられない馬鹿だと患者も大変だぞ。
はよ、答えてみ。
66 卵の名無しさん sage 2018/10/08(月) 09:22:57.88 ID:mQHuWxdH
ド底辺聖マ卒 頭悪すぎ
という意見がでてるぞ。 >>186
>>179
>>165
>>158
んで、あんたどこの医大？
これに答えられない馬鹿だと患者も大変だぞ。
はよ、答えてみ。
66 卵の名無しさん sage 2018/10/08(月) 09:22:57.88 ID:mQHuWxdH
ド底辺聖マ卒 頭悪すぎ
という意見がでてるぞ。 この後はしばらく イヤーノートを繰り返し読む
問題集を見て条件反射で回答できるようになればオーケー！ 女子2人男子2人のこじんまりとした勉強会だが
ペースメーカーになって順調に勉強が進んでる
みんな合格圏に入ってる みんなに感謝したい これだけまとまった勉強は大学受験以来だな
国試はやはり厳しいものだな マークシート方式は記述問題よりごまかしがきかない
中間点もないし 本当の実力がわかるんだな >>187
他スレにこういう意見もある。
銭払って医師免許を手に入れたのが悪いのか？
偏差値足りない分を、銭という権力で補っただけだ！
他人が馬鹿正直に走るマラソンに、タクシーで参加したのが、我々私立医！
文句言われる筋合いはない！ >>194
裏口入学が判明しても除籍しないのだからシリツに公正さはないな。
裏口学生だらけだからシリツ医大生は誰も問題にしないらしいね。 京大卒と思われる方のお言葉です。
>>
膨大な情報を活用しなければいけない仕事だと認識しているからこそ、命のかかった病気においては特に、せめて自分よりは頭がいい先生に診てもらいたいと思ってしまいます。その場合に、出身校、入学した学校、は嘘をつかないとおもいます。
<< >>190
>>186
>>179
>>165
>>158
んで、あんたどこの医大？
これに答えられない馬鹿だと患者も大変だぞ。
はよ、答えてみ。
66 卵の名無しさん sage 2018/10/08(月) 09:22:57.88 ID:mQHuWxdH
ド底辺聖マ卒 頭悪すぎ
という意見がでてるぞ。 今日も低脳私立医VS事務員ですか？
私立医とはいえ仮にも医者なのに暇で馬鹿そうですね！ ★★★★★★★超最新版★★★★★★★
第2回駿台全国判定模試 2018年度合格目標ライン 国公立大学医学部医学科偏差値(前期日程) 2018年9月28日更新
※+●東京大学(理科Ⅰ類、理科Ⅱ類)、★京都大学(理、工、農、薬、経済･理系、教育･理系、総合人間･理系)、
▼東京工業大学を含む
https://www2.i-sum.jp/yobi/sv/sundai/member_P/member_goukaku_PD/1337144684076.html
73--東京
72--京都 ←★★★★★祝ノーベル医学生理学賞受賞★★★★★
71--大阪、東京医科歯科
70--名古屋
69--東北、九州、千葉、横浜市立、京都府立医科、大阪市立、神戸、広島、●東京(理科Ⅰ類)
68--北海道、筑波、山梨(後期)、岡山
67--金沢、名古屋市立、奈良県立医科、長崎
66--新潟、岐阜、三重、和歌山県立医科、熊本、●東京(理科Ⅱ類)、★京都(理)、★京都(薬)、★京都(工･物理工)、
―★京都(農･応用生命科、食品生物科)
65--札幌医科、群馬、富山、信州、浜松医科、滋賀医科、山口、高知、鹿児島、★京都(工･情報)
64--福井、鳥取、徳島、香川、愛媛、大分、★京都(工･建築)、★京都(農･資源生物科、食料/環境経済)、
―★京都(総合人間･理系)、▼東京工業(工)、▼東京工業(情報理工)
63--旭川医科、秋田、山形、福島県立医科、島根、佐賀、宮崎、琉球、★京都(工･工業化、電気電子工)、
―★京都(農･地域環境工、森林科)、★京都(経済･理系)、★京都(教育･理系)、▼東京工業(物質理工)、
―▼東京工業(環境社会理工)
62--弘前、★京都(工･地球工)、▼東京工業(理)、▼東京工業(生命理工) 問: ●に当てはまる漢字は何か？
224 卵の名無しさん 2018/10/16(火) 17:14:17.85 ID:y//B5I3Q
....
●立出の医者はサナダムシより気持ち悪い
馬鹿な上、卑怯卑劣、犬畜生以下のジメジメしたナメクジみたいな陰湿粘着質な生物
答は
https://egg.2ch.net/test/read.cgi/hosp/1533436098/224 # トランプの束がある
# 2～10までの数字が描かれたカードが各スートに1枚ずつと、ジョーカーのカードが24枚ある
# 全てを混ぜて無作為に切り直して12枚のカードを無作為に引いたとき
# その12枚のカードのうちジョーカー以外にいずれも違う数字が書かれている確率はいくらか
x=c(rep(2:10,4),rep(0,24))
f <- function(){
y=sample(x,12)
z=y[which(y!=0)]
length(z)==length(unique(z))
}
re=replicate(1e4,mean(replicate(1e4,f())))
summary(re)
> summary(re)
Min. 1st Qu. Median Mean 3rd Qu. Max.
0.0992 0.1085 0.1106 0.1106 0.1127 0.1217 >>204
Haskell の練習
Prelude> choose (n,r) = product[1..n] `div` product[1..n-r] `div` product[1..r]
Prelude> fromIntegral(sum $ map (\k -> choose(24,k)*choose(9,12-k)*4^(12-k)) [0..12]) /fromIntegral(choose(60,12))
0.1106278297721166 >>205
学位とろうが、専門医とろうが、金儲けしようが、一生、裏口バカと蔑まれるのだから気にすんじゃない？
>156みれば一目瞭然 >>206
シミュレーション解と一致して気持ちが( ・∀・)ｲｲ!! 分数表示すると
7371811052/66636135475
おい、ド底辺、これが既約分数かどうか検算してみ！
割り算くらいできるんだろ？ これ面白いな
# 縦3マス、横4マスの12マスのうちランダムに選ばれた2マスにそれぞれ宝が眠っている。
# AEIBFJ…の順で縦に宝を探していく方法をとるP君と、
# ABCDEFGH…の順で横に宝を探していく方法をとるQ君が、同時に地点Aから探索を開始した。
# どっちの方が有利？
#
# ABCD
# EFGH
# IJKL >>210
x=c(1,1,rep(0,10))
is.P1st <- function(){ # is P the first to find the treasure?
Q=sample(x)
z=matrix(Q,ncol=4,byrow=T)
P=as.vector(z)
which.max(P) < which.max(Q)
}
re=replicate(1e4,mean(replicate(1e4,is.P1st())))
summary(re) > x=c(1,1,rep(0,10))
> is.P1st <- function(){
+ Q=sample(x)
+ z=matrix(Q,ncol=4,byrow=T)
+ P=as.vector(z)
+ which.max(P) < which.max(Q)
+ }
> re=replicate(1e4,mean(replicate(1e4,is.P1st())))
> summary(re)
Min. 1st Qu. Median Mean 3rd Qu. Max.
0.3749 0.3906 0.3939 0.3939 0.3972 0.4132 >>212
バグ修正
> x=c(1,1,rep(0,10))
> PQ <- function(){
+ Q=sample(x)
+ z=matrix(Q,ncol=4,byrow=T)
+ P=as.vector(z)
+ c( even=which.max(P) == which.max(Q),
+ p1st=which.max(P) < which.max(Q),
+ q1st=which.max(P) > which.max(Q))
+
+ }
> k=1e6
> re=replicate(k,PQ())
> mean(re['even',]) ; 13/(26+27+13)
[1] 0.197025
[1] 0.1969697
> mean(re['p1st',]) ; 26/(26+27+13)
[1] 0.393803
[1] 0.3939394
> mean(re['q1st',]) ; 27/(26+27+13)
[1] 0.409172
[1] 0.4090909 裏口私立医大卒の連中ですら専門医を持ってるのに
お前ら専門医ぐらい持ってないと恥ずかしいぞ。 >>210
直感的には同等なんだが微妙な差がある。 >>210
面白いので
縦ｍマス、横ｎマスのｍ＊ｎマスのうちランダムに選ばれたｋマスにそれぞれ宝が眠っている。
AEIBFJ…の順で縦に宝を探していく方法をとるP君と、ABCDEFGH…の順で横に宝を探していく方法をとるQ君が、同時に地点Aから探索を開始した。
どっちの方が有利？
という風に一般化してみた。
問題を解くプログラムを書いてみた。
treasure <- function(m=3,n=4,k=2){
y=1:(m*n)
(z=matrix(y,ncol=n,byrow=T))
(P=as.vector(z))
(Q=as.vector(t(z)))
PQ <- function(x){
p=q=numeric(k)
for(i in 1:k){
p[i]=which(P==x[i])
q[i]=which(Q==x[i])
}
min(p)-min(q)
}
tre=combn(m*n,k)
re=apply(tre,2,PQ)
c(P1st=sum(re<0),Q1st=sum(re>0),even=sum(re==0))
}
treasure(3,4,2)
treasure(5,10,3) 例えば
縦５マス、横１０マス、宝３マスだと
P1st Q1st even
8832 9142 1626
（P1stはPが先に宝を発見する宝の配置の数）
Rのコードはここにおいた
Executeのクリックで実行（数値を変えて実行も可能）
http://tpcg.io/Ejjcs2 >>217
シミュレーションプログラムも一般化してみた。
m=5;n=10;k=3
x=c(rep(1,k),rep(0,m*n-k))
PQ <- function(){
Q=sample(x)
z=matrix(Q,ncol=n,byrow=T)
P=as.vector(z)
c( even=which.max(P) == which.max(Q),
p1st=which.max(P) < which.max(Q),
q1st=which.max(P) > which.max(Q))
}
j=choose(m*n,k)
sim <- function(){
re=replicate(j,PQ())
c(sum(re['p1st',]) ,
sum(re['q1st',]) ,
sum(re['even',]) )
}
re=replicate(1e3,sim())
for(i in 1:3) print(summary(re[i,]))
treasure(m,n,k) >>220
> for(i in 1:3) print(summary(re[i,]))
Min. 1st Qu. Median Mean 3rd Qu. Max.
8661 8793 8833 8839 8886 8986
Min. 1st Qu. Median Mean 3rd Qu. Max.
8993 9091 9142 9137 9177 9314
Min. 1st Qu. Median Mean 3rd Qu. Max.
1524 1592 1624 1624 1651 1737
> treasure(m,n,k)
P1st Q1st even
8832 9142 1626
理論値とシミュレーションが一致すると朝から気分が( ・∀・)ｲｲ!! シミュレーション回数を増やすと更に理論値に近似する。
50C3*1000回のシミュレーション結果
> for(i in 1:3) print(summary(re[i,]))
Min. 1st Qu. Median Mean 3rd Qu. Max.
8585 8786 8834 8833 8881 9058
Min. 1st Qu. Median Mean 3rd Qu. Max.
8876 9090 9141 9142 9187 9392
Min. 1st Qu. Median Mean 3rd Qu. Max.
1509 1599 1626 1625 1652 1745
理論値
> treasure(m,n,k)
P1st Q1st even
8832 9142 1626 >>222
ド底辺シリツ医大卒が投稿すればするほど
ド底辺シリツ医大卒＝裏口バカという公式が実証されるのに似ているｗｗｗ 地元の国立大学医学部にも進学できないような低学力のものが医者になる必要はない。
幸い都内には国立大学２校に医学部がある。 >>226
あんた、どこ卒？
これであっているのか？
66 卵の名無しさん sage 2018/10/08(月) 09:22:57.88 ID:mQHuWxdH
ド底辺聖マ卒 頭悪すぎ
卒業大学も忘れるほど、認知症が進んでる？
いや、それ以前に知恵遅れ？？ ステーキハウスでの待ち時間にこれで遊ぶ。
https://i.imgur.com/SwONJrA.jpg
sim <- function(n){
A=B=C=0
for(i in 1:n){
x=sample(c('A','B','C'),1)
if (x=='A' & A<2) A=A+1
if (x=='B' & B<1) B=B+1
if (x=='C' & C<1) C=C+1
}
return(A+B+C)
} >>226
このスレのド底辺シリツ医大卒が唱える第一法則は修正が必要だな。
1: It is not the bottom medical school but its enrollee that is despicable, which deserves to be called a bona fide moron beyond redemption.
ド底辺シリツ医大が悪いのではない、本人の頭が悪いんだ。
から
ド底辺シリツ医大が悪いのではない、私の頭が悪いんだ。
ここで問題。
ド底辺シリツ医大が悪いのではない、私の頭が悪いんだ
に合致するように英文を修正せよ。
おい、ド底辺、裏口バカでも英語くらいできるのを示すチャンスだぞ。 これを方程式立てずに正解できる小学生って凄いと思う。
まあ、ド底辺シリツ医大卒の裏口バカだと方程式すら立てられないと思う。きりのいい数なので方程式自体は暗算でできるレベルだけど。
ある牧場では１００頭の羊を放すと１５日間で牧草がなくなり、１２０頭の羊を放すと１０日間で牧草が食べつくされました。
この牧場で８０頭の羊を１０日間放した後、さらに何頭かの羊を加えたところ、加えてから４日間で牧草は食べつくされました。 後から加えた羊は何頭ですか。
ただし、牧草は１日に一定量生え、また、どの羊も１日で同じ量の牧草を食べるものとします。
オイ、ド底辺。
これに答えて小学生の問題くらい解ける学力があるのを示してみ！ 上位国立卒ならこれくらい答えられる教養はほしい。
インフルエンザの迅速キットは特異度は高いが感度は検査時期によって左右される。
ある診断キットが開発されたとする。
このキットは特異度は９９％と良好であったが、
感度については確かな情報がない。
事前確率分布として一様分布を仮定する。
５０人を無作為抽出してこの診断キットで診断したところ４０人が陽性であった。
この母集団の有病率の期待値と９５％ＣＩはいくらか？
またこの診断キットの感度の期待値と９５％ＣＩはいくらか ド底辺シリツ医大卒用に課題を用意してあんのに。
裏口私立用の小学生対象の問題の数値を改変。
専門医スレとどちらが先に答が出せるかな。
数字の１と２だけを使って整数を作り、小さい方から並べます。１，２，１１，１２，２１，２２・・・このとき、次の問に答えなさい。
（１）１２１２１２１２１２は小さい方から数えて何番目ですか。 >>234
オイ、ド底辺これの検算してみ！
数字の１と２だけを使って整数を作り、小さい方から並べます。１，２，１１，１２，２１，２２・・・このとき、次の問に答えなさい。
(2)１００万個めに来る数字は何か答えよ。
2221211112112111112
となったがあってるか。
数字は１と２だけだし、微積分どころか四則演算も必要なし、
数字の大小比較ができれば答がでる。
ちゃんと検算して間違っていたら訂正してみ！ １千万個めはこうなったぞ、あってるか？
Prelude> :main
Type number: 10000000
11221112112122121111112 >>236
問題をどんどん平易にしているのに、答えられないってバカなのかなぁ？
バカなのにどうして大学には入ることができたのだろう？
やっぱり、あれ？
う
ら
ぐ
ち おい、ド底辺
オイ、ド底辺これの検算してみ！
数字の１と２だけを使って整数を作り、小さい方から並べます。１，２，１１，１２，２１，２２・・・このとき、次の問に答えなさい。
１億個めに来る数字は何か答えよ。
１兆個めに来る数字は何か答えよ。
数学板でエレガントな解法が投稿されたのでそれを応用してメモリー制限の壁を突破してRで計算できたぞ
> digit12(10^8) # 1億め
12222212122221111211111112
> digit12(10^12) # 1兆め
221211122121211212112121112111111111112
検算しておけよ。 >>240
>>226
あんた、どこ卒？
これであっているのか？
66 卵の名無しさん sage 2018/10/08(月) 09:22:57.88 ID:mQHuWxdH
ド底辺聖マ卒 頭悪すぎ
卒業大学も忘れるほど、認知症が進んでる？
いや、それ以前に知恵遅れ？？ >>240
>>226
英作文もできないってやっぱり、裏口入学？
このスレのド底辺シリツ医大卒が唱える第一法則は修正が必要だな。
1: It is not the bottom medical school but its enrollee that is despicable, which deserves to be called a bona fide moron beyond redemption.
ド底辺シリツ医大が悪いのではない、本人の頭が悪いんだ。
から
ド底辺シリツ医大が悪いのではない、私の頭が悪いんだ。
ここで問題。
ド底辺シリツ医大が悪いのではない、私の頭が悪いんだ
に合致するように英文を修正せよ。
おい、ド底辺、裏口バカでも英語くらいできるのを示すチャンスだぞ。 あ 私は高卒で医療事務の総務課で働いております
一緒に頑張りましょう >>243
神学部卒を名乗ったり、
ド底辺シリツ医大卒って
恥ずかしいんだなぁ。
現在も通用する、不朽の名投稿
(quote)
私は昭和の時代に大学受験したけど、昔は今よりも差別感が凄く、慶応以外の私立医は特殊民のための特殊学校というイメージで開業医のバカ息子以外は誰も受験しようとすらしなかった。
常識的に考えて、数千万という法外な金を払って、しかも同業者からも患者からもバカだの裏口だのと散々罵られるのをわかって好き好んで私立医に行く同級生は一人もいませんでした。
本人には面と向かっては言わないけれど、俺くらいの年代の人間は、おそらくは８－９割は私立卒を今でも「何偉そうなこと抜かしてるんだ、この裏口バカが」と心の底で軽蔑し、嘲笑しているよ。当の本人には面と向かっては絶対にそんなことは言わないけどね。
(unquote) せっかく医学部に入学したのに医師になれなかったのは辛いでしょう
しかし 仕事はたくさんありますよ 人生諦めては負けですよ まずはご病気を治療されてから 頑張ってください 私ども事務にとっては やはり医師の先生方はとても大事な存在です また卒業大学も全く気にはしておりません 医師国家試験を合格された先生方は偉大な方々と皆 尊敬しております >>239
Haskell使ったら一京めも計算できた。
11122211112212222112112212222221111121111111111111112
おい、ド底辺、きちんと検算しておけよ。
微積分も統計も四則演算も必要ない、１と２からなる数字を小さい順に並べるだけだ。
大小比較と数を数えることができれば、ド底辺シリツ医大卒の裏口バカでもできるはず。 >>246
ナマポ未満の知性だな。
ナマポも避けたがるのがド底辺シリツ医大卒
ナマポの症例報告です。
実例↓
517 卵の名無しさん 2018/02/25(日) 11:36:00.56 ID:gq76tAvs
福岡のあの歯科大かな？
歯科口腔外科で抜歯依頼したら爺ちゃんが〇〇歯科大卒の先生は避けて下さいねがあった
けど。
この爺ちゃん、聖マリ卒の先生もよけて下さいと初診時に言ってた札付き爺さん。
生保受給者のくせにね。
ひょっとして
これであっているのか？
66 卵の名無しさん sage 2018/10/08(月) 09:22:57.88 ID:mQHuWxdH
ド底辺聖マ卒 頭悪すぎ
卒業大学も忘れるほど、認知症が進んでる？
いや、それ以前に知恵遅れ？？ 視野を広げる必要があるのではないでしょうか？ここの掲示板は医師以外の一般人も閲覧してますよ？ １０の６８乗を無量大数と呼ぶらしい
１無量大数めの値をHaskellを使って計算してみたぞ。
ちゃんと検算しておくように。
221221212211122212111211122111222121211221112112222212211211222121122112121122221212121212121111221112222212221121121222212221212112111121212212211121222111211111111111111111111111111111111111111111111111111111111111111111112 >>249
スレタイが実証されているだろ？
検算はどこまで終わった？
あんた、どこ卒？
これであっているのか？
66 卵の名無しさん sage 2018/10/08(月) 09:22:57.88 ID:mQHuWxdH
ド底辺聖マ卒 頭悪すぎ
卒業大学も忘れるほど、認知症が進んでる？
いや、それ以前に知恵遅れ？？ やはり まずはご病気の治療をなさってからでないと 社会では相手をされないでしょう 残念ながら社会人としては失格者と思われてしまいます >>253
あんた、どこ卒？
これであっているのか？
66 卵の名無しさん sage 2018/10/08(月) 09:22:57.88 ID:mQHuWxdH
ド底辺聖マ卒 頭悪すぎ >>253
社会人どころか、ナマポも避けたがるのがド底辺シリツ医大卒
ナマポの症例報告です。
実例↓
517 卵の名無しさん 2018/02/25(日) 11:36:00.56 ID:gq76tAvs
福岡のあの歯科大かな？
歯科口腔外科で抜歯依頼したら爺ちゃんが〇〇歯科大卒の先生は避けて下さいねがあった
けど。
この爺ちゃん、聖マリ卒の先生もよけて下さいと初診時に言ってた札付き爺さん。
生保受給者のくせにね。 あ 私は高校卒業後 大学には行かず ある総合病院に就職して 現在は総務課で勤務しております >>250
これを投稿したら、
１０００不可説不可説転でお願いします、というレスが来た。
遊び心に応えてみる。
Wikipediaによると10の372183838819776444413065976878496481295乗とのこと
Prelude> dec2n n = concat . (map show) . reverse . sub where sub 0 = [] ; sub num = mod num n : sub (div num n)
Prelude> putStrLn $ dec2n 2 (100*10^372183838819776444413065976878496481295)
計算終了せず、多分、フリーズして終了だろうな。
おい、ド底辺、１０００不可説不可説転の方を数えてくれ。 孤独なのですね お辛いお気持ちはわかります しかし人生はまだ長いですよ これからは自分にとって適性のある良いお仕事が見つかるといいですね >>259
あんた、どこ卒？
これであっているのか？
66 卵の名無しさん sage 2018/10/08(月) 09:22:57.88 ID:mQHuWxdH
ド底辺聖マ卒 頭悪すぎ >>259
ナマポも避けたがるのがド底辺シリツ医大卒ほど惨めな存在はないと思うだろ？ これね！
＞同業者からも患者からもバカだの裏口だのと散々罵られるのをわかって好き好んで私立医に行く同級生は一人もいませんでした。
今も好き好んで行く椰子はいないだろうなぁ。 >>262
>>259
あんた、どこ卒？
これであっているのか？
66 卵の名無しさん sage 2018/10/08(月) 09:22:57.88 ID:mQHuWxdH
ド底辺聖マ卒 頭悪すぎ
これがお前には都合がいいのか？
ナマポも蔑む存在だぞ！ 切れているのはド底辺シリツ医大にしか行けない椰子のオツムだよ！
>>265
>>259
あんた、どこ卒？
これであっているのか？
66 卵の名無しさん sage 2018/10/08(月) 09:22:57.88 ID:mQHuWxdH
ド底辺聖マ卒 頭悪すぎ >>267
ド底辺シリツ医大卒だろ？
高卒の学力すらないじゃん。 まずは 良い病院で治療されることをお勧めします 頑張ってください >>262
>>259
あんた、どこ卒？
これであっているのか？
66 卵の名無しさん sage 2018/10/08(月) 09:22:57.88 ID:mQHuWxdH
ド底辺聖マ卒 頭悪すぎ
これがお前には都合がいいのか？
ナマポも蔑む存在だぞ！ >>271
地元国立大学にすら入れない椰子が金やコネで裏口入学こそ甘えだろうなぁ。
甘えというより不正だが。
あんた、どこ卒？
これであっているのか？
66 卵の名無しさん sage 2018/10/08(月) 09:22:57.88 ID:mQHuWxdH
ド底辺聖マ卒 頭悪すぎ 専門医すれにこういうの書くやつってド底辺シリツ医大卒じゃないかなぁ？
【現役医師】専門医資格取得について、どうお考えですか？ 第２章
https://egg.5ch.net/test/read.cgi/hosp/1539580796/84
84 名前：卵の名無しさん[] 投稿日：2018/10/23(火) 18:42:11.56 ID:Tzq6uyHn
算数は受験の時以外使わないのが医学ですから
予想どおり算数もできないバカのようだ、裏口かな？
>>84
普通に使うだろ
陽性尤度比が１５、陰性尤度比が０．２の検査の感度と特異度を答えてみ！
数学が必要じゃん！！ We hold these truths to be self-evident, that all "uraguchi" are created retards,
That they are endowed by their creator with certain unalienable traits, that among these are sloth, mythomania, and the pursuit of imbecility.
That to rectify these traits, Bottom Medical Schools (BMS) are instituted for retards, deriving their just powers from what has been referred as the arbitrary donation of the parents of the rectified,
That whenever any form of the retards becomes destructive of rectification,
it is the right of the BMS to suspend or expel them, and to impose additional tuition laying its foundation on such principles and organizing its powers in such form, as to them shall seem most likely to effect the profit of BMS .
Prudence, indeed, will dictate that "uraguchi" long established cannot be changed for light and transient causes;
and accordingly all experience has shown, that BMS are more disposed to suffer, while evils are sufferable, than to right themselves by abolishing the forms from which they can pursue profit.
But when a long train of misbehavior and misconduct , showing invariably the same Imbecility evinces a design to reveal themselves as absolute Bona Fide Moron ,
it is their right, it is their duty, to expel such "uraguchi", and to provide new guards for their future security.
There will be no English response from bona fide morons suffering EBMS（Expellee from Bottom Medical School) Syndrome.
Last but not least,
it is not the bottom medical school but its enrollee that is despicable, which deserves to be called a bona fide moron beyond redemption. 算数の掛け算すら怪しいのがシリツ医がこういう事故を起こすわけなんだな。
http://i.imgur.com/ArPaux9.png >>278
>>259
あんた、どこ卒？
これであっているのか？
66 卵の名無しさん sage 2018/10/08(月) 09:22:57.88 ID:mQHuWxdH
ド底辺聖マ卒 頭悪すぎ >>281
>>278
>>259
高卒学力もない椰子ってド底辺シリツ医大卒と推測されるｗ
あんた、どこ卒？
これであっているのか？
66 卵の名無しさん sage 2018/10/08(月) 09:22:57.88 ID:mQHuWxdH
ド底辺聖マ卒 頭悪すぎ Haskellのコードを写経したのにコンパイルエラーがでる ：（
同じ体験をした方もいたみたいだな。
http://jumperson.hatenablog.com/entry/2014/12/31/211853
import Control.Exception --書籍掲載なし
を追加して、無事解決 ：） ニュー速+での正論
891 名無しさん＠１周年 2018/10/24(水) 18:54:28.27 ID:7fnADKlS0
私立の医大で平等とかもうね。
腹抱えて爆笑するネタだろ。
金持ちだけが入学できる学校を受験できる令嬢(親も医者）が差別されたと、同情してる庶民の構図。
同情してる大半は、子供がそこを受験すらできない層の方というね。 これにも納得！
900 名無しさん＠１周年 2018/10/24(水) 19:02:07.55 ID:7fnADKlS0
裏口入学は金のある家庭が入学できるわけで、私立の医大は裏口しかないないのと同じ。
裏口内での選別があって１０点とかのしょうもない差別があったようなもん。
実際の裏口入学でも私立の医大の正規入学ほど金掛からんのだよ。
実力があっても医者になれなかった人は、経済的理由で私立の医大に受験できなかった人であって
１０点とかしょうもない操作で落ちた人間ではない。 私立医大は私学助成金をすべてカットすれば良いのに。 ニュー速に貼られてたんだけど
これワロタｗ
79名無しさん＠１周年2018/10/25(木) 04:19:36.02ID:9iKWtOlr0
----
, ─ ､＿/´ , ､ ＼ みなさ～ん ちゃんとついてきてくださ～い ♪
. .／ , ､, ｀丶::.. ｉ
| :..:..:／ ＼:.. //￣ ｀ ～ ´⌒/ , -- 、_, ／|＿／|
| :..:/ 丶// 東京医大 / , -- ､_,i＾ω＾ /＜::::::::::::::::::＞
＼ i ● ● ﾞ//─～, __ ,─ , -- ､_,i・,、・ /ゝ____ノ／::::::::::::::／⊃高額寄付
! ,´.●｀,ヽ .// , -- ､._, i・,、・ /ゝ____ノ :::'::::'::: ::::::::::::
ゝ､ﾞ､ﾆ ' ﾉ _// i・,、・ / ゝ____ノ ::::'::::':::: VIP . , -- ､._,
/~,（`ー ′イ(⌒ヽ, . ゝ____ノ ::::'::::':::: 女 , -- ､._ ,i・,、・ /
/⌒))/ (____ﾉ_) ::::'::::':::: 佐野君 , -- ､_, i・,、・ / ゝ____ノ
｀-´/ 裏口 i ＋･ν速 ., -- ､_, i・,、・ /ゝ____ノ ::::'::::'::::
｀ヽ________ ｲ iノ::::::::::: i・,、・ /ゝ____ノ ::::'::::'::::
:::::::::::,/＿、ｲヽ_ノ:::::::: ゝ____ノ ::::'::::'::::
:::::::(｀⌒´ノ::::::::: ::::'::::'::::
::::::::::::::::::::: こういうのをみるとか
一次試験、面接試験、および全体の合格率に有意差があるかを
検定せずにはいられないな。
>>
東京医科大の件って何が問題なの？男優遇だから駄目なの？
この東京医科大の件は筆記試験の点数を調整したからバレただけの話で、
面接なら印象点(笑)でいくらでも調整できて、かつ、不正の証拠も残らない(担当者の印象だから不正の証明のしようがない）わけで。
東京医科大の連中は税金乞食採用試験を見習えよ。
今年8月3日に合格発表の裁判所事務官採用試験（大阪高裁管轄） の結果を見よ
↓
受験者
男880 1次通過者224 合格者43
女736 1次通過者159 合格者87
調整の出来ない1次試験の通過率 男25.5% 女21.6％
調整し放題の面接と称する試験合格率 男19.2% 女54.7%
http://www.courts.go.jp/saiyo/vcms_lf/3all-h30s4-di.pdf
<< >>289
男880 1次通過者224 合格者43
女736 1次通過者159 合格者87
x=c(880,736)
y=c(224,159)
z=c(43,87)
fisher.test(cbind(x-y,y))$p.value
fisher.test(cbind(y-z,z))$p.value
fisher.test(cbind(x-z,z))$p.value 男880 1次通過者224 合格者43
女736 1次通過者159 合格者87
x=c(880,736)
y=c(224,159)
z=c(43,87)
fisher.test(cbind(x-y,y))$p.value
fisher.test(cbind(y-z,z))$p.value
fisher.test(cbind(x-z,z))$p.value
prop.test(y,x)
prop.test(z,y)
prop.test(z,x) 日大と東京医大の助成金交付、国が保留
10/23(火) 19:24配信 TBS News i
Copyright(C) Japan News Network. All rights reserved.
アメフトで重大な反則行為があった日本大学と
不正入試が明らかになった東京医科大学に対し、
国は助成金の交付を保留する決定をしました。
関係者によりますと、私立大学への助成金を決める
「日本私立学校振興・共済事業団」は、２３日、外部有識者からなる会議を行い、
日本大学と東京医大について「学校の管理運営が適切ではない」などとして
助成金の交付を保留する決定をしました。
日本大学はアメリカンフットボール部員の悪質タックル問題を受けての対応について
、また、東京医大は、医学部の不正入試問題で理事長と学長が起訴されたことが
問題視されました。
昨年度、日本大学はおよそ９１億円、東京医大はおよそ２３億円の私学助成金が交付されています。（23日18:31）
最終更新:10/24(水) 10:45 西宮市の甲陽学院高校 64回生 多田仁彦医師(阪大・医学部出身)
（大阪府和泉市 府中病院の麻酔科医長を解雇済み）が経営する
西宮市 苦楽園口駅近くのバーアルフェッカの電話番号→0798-71-5135
多田仁彦医師の携帯番号→
090-7109-1478
多田仁彦医師からの「殺人未遂事件」「殺人未遂事件」「殺人未遂事件」の
被害者で元宝塚ジェンヌ 入江美穂さんの携帯番号→
080-9124-0605
皆さんで殺人未遂事件の被害者 元宝塚ジェンヌの入江美穂さんを助けましょう！ 西宮市の甲陽学院高校 64回生 多田仁彦医師(阪大・医学部出身)
（大阪府和泉市 府中病院の麻酔科医長を解雇済み）が経営する
西宮市 苦楽園口駅近くのバーアルフェッカの電話番号→0798-71-5135
多田仁彦医師の携帯番号→
090-7109-1478
多田仁彦医師からの「殺人未遂事件」「殺人未遂事件」「殺人未遂事件」の
被害者で元宝塚ジェンヌ 入江美穂さんの携帯番号→
080-9124-0605
皆さんで殺人未遂事件の被害者 元宝塚ジェンヌの入江美穂さんを助けましょう！ 日大と東京医大の助成金交付、国が保留
10/23(火) 19:24配信 TBS News i
Copyright(C) Japan News Network. All rights reserved.
アメフトで重大な反則行為があった日本大学と
不正入試が明らかになった東京医科大学に対し、
国は助成金の交付を保留する決定をしました。
関係者によりますと、私立大学への助成金を決める
「日本私立学校振興・共済事業団」は、２３日、外部有識者からなる会議を行い、
日本大学と東京医大について「学校の管理運営が適切ではない」などとして
助成金の交付を保留する決定をしました。
日本大学はアメリカンフットボール部員の悪質タックル問題を受けての対応について
、また、東京医大は、医学部の不正入試問題で理事長と学長が起訴されたことが
問題視されました。
昨年度、日本大学はおよそ９１億円、東京医大はおよそ２３億円の私学助成金が交付されています。（23日18:31） 東京医大、本来合格者入学許可へ 今年の受験生５０人
2018年10月25日 02時06分
東京医科大＝８月、東京都新宿区
拡大する
東京医科大が今年の入試で本来合格ラインを上回っていたのに、不正の影響で不合格となった受験生５０人に対し、来年４月の入学を認める方針を固めたことが２４日、関係者への取材で分かった。
昨年の本来合格者１９人については、難しいとの意見が出ているもようだ。東京医大は５０人のうち入学希望が多数に上った場合は、来年の一般入試の募集人員減も検討。
https://www.nishinippon.co.jp/sp/nnp/national/article/460101/ >>301
それをすると５０人退学させないと公正でなくなる。 1学年のうち50人退学って、
1学年の定員が何人か知らんけど
あんた、もうねｗ 佐野貴徳のプロフィール
名前 佐野貴徳 （さの たかのり）
生年月日 1999年4月1日
年齢 19歳（2018年7月現在）
住所 東京都港区
出身校 私立成蹊高校
大学 東京医科大学
父：文科省始まって以来の犯罪者
性格 史上最強の利己主義者
診断 反社会性境界性演技性依存性統合失調型パーソナリティ障害（難治型） 東京医大の事件で点数加算の不正まで発覚しているのに、
>裏？
>そんなのあるかよばか
と言ってる椰子がいたな。
こいつも裏口入学したシリツ医だろうと推測されるね。
http://imagizer.imageshack.com/img924/4761/OuxS6x.jpg 裏口入学が都市伝説だとか過去の話というのは
嘘だと全国民が知りつくしたのが東京医大の事件だね。
縁故や寄付金じゃなくて試験データの改竄。
シリツ＝裏口バカが確定。
まあ、当事者はずっと前に認識していたようだ。
ガチの裏と呼んでその存在を認めている。
http://imagizer.imageshack.com/img923/7955/w1bWeN.jpg
ガチの裏ｗｗｗｗｗｗｗ >>303
それをやってはじめてシリツにも自浄作用があるといえる。 数学板の、分からない問題はここに書いてね スレで話題のテーマで問題を作ってみた。
ド底辺シリツ医大生が８人いてそのうち３人は裏口入学であることが判明している。
８人をA,B,C,D,E,F,G,Hとする。
A,B,C,D,E,F,G,Hの順に調査して３人みつかれば調査は終了とする。
A,B,C,D,E,F,G,Hの順の調査と比べて早くみつかる可能性の探索順を列挙せよ。
[,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8]
[1,] A B D E F G H C
[2,] A C D E F G H B
[3,] A D B E F G H C
[4,] A D C E F G H B
[5,] B A D E F G H C
[6,] B C D E F G H A
[7,] B D A E F G H C
[8,] B D C E F G H A
[9,] C A D E F G H B
[10,] C B D E F G H A
[11,] C D A E F G H B
[12,] C D B E F G H A
[13,] D A B E F G H C
[14,] D A C E F G H B
[15,] D B A E F G H C
[16,] D B C E F G H A
[17,] D C A E F G H B
[18,] D C B E F G H A
おい、ド底辺、これであっているか検証してみ！
直観に反する問題だから、どうやって検証するのかすらわからんかな？ １００万回シミュレーションして確認
> # sim
> n=8
> k=3
> fo=readRDS('fast_order.rds')
> y=fo[sample(1:nrow(fo),1),]
> cat(LETTERS[y])
A D B E F G H C
> sim <- function(){
+ x=sample(1:n,k)
+ re=numeric(k)
+ for(i in 1:k){
+ re[i]=which(y==x[i])
+ }
+ max(re) - max(x)
+ }
> K=1e6
> re=replicate(K,sim())
> c(Earlier=mean(re<0),Later=mean(re>0),Equal=mean(re==0))
Earlier Later Equal
0.625315 0.267296 0.107389 東京医大、本来合格者入学許可へ 今年の受験生５０人
2018年10月25日 02時06分
東京医科大＝８月、東京都新宿区
東京医科大が今年の入試で本来合格ラインを上回っていたのに、不正の影響で不合格となった受験生５０人に対し、来年４月の入学を認める方針を固めたことが２４日、関係者への取材で分かった。
昨年の本来合格者１９人については、難しいとの意見が出ているもようだ。東京医大は５０人のうち入学希望が多数に上った場合は、来年の一般入試の募集人員減も検討。
https://www.nishinippon.co.jp/sp/nnp/national/article/460101/
https://www.tokyo-med.ac.jp/med/enrollment.htmlによると
学年 第1学年 第2学年
在学者数 133 113
昨年入学者の留年者や退学者が０として、
大学が公式認定した裏口入学者が少なくとも今年は１３３人中５０人、昨年が１１３人中１９人ということになる。
裏口入学率の期待値、最頻値、およびその９５％信頼区間を求めよ。 >>310
裏口入学者には裏金返して一旦、除籍、
来年の入試を受けさせて学力考査のみで合否判定、合格すればもとの学年に復学。
最低、これくらいはやるべき。 もう私立医大って裏口ばかりなんだろうな。
せめて慶応だけは裏口が無いと信じたい。 六面体のサイコロでP君のサイコロは３面が１、Q君のサイコロは２面が１とする。
サイコロを降ってどちらか一方が１であればそちらが勝者。
どちらも１であるときはもしくはどちらも１でないならば どちらか一方だけが１が出て勝者が決まるまで繰り返す。
P君、Q君の勝つ確率を求めよ。
級数の和を使って
Σ[1,∞](1/4)^i = 1/4 *(1-1/4)= 1/3
Pr[P:win]=1/2+1/3*1/2=2/3
Pr[Q:win]1/4+1/3*1/4=1/3
で解ける（ド底辺シリツ医大卒の裏口バカには無理）が
数学板に書いたら速攻で級数計算なしでの正解が返ってきた。
世の中には頭のいい人がいるもんだ。
まあ、ド底辺シリツ医大に裏口入学するしかないバカもいるが。 >>315
>313はド底辺シリツのキーワードがないから別人。 理3 そこそこ頭いい
旧帝医 人間として普通
地方医、私立医 自分でも頭わるいこと自覚してるだろ？ ＞東京医大は５０人のうち入学希望が多数に上った場合は、来年の一般入試の募集人員減も検討。
うわひどい
これつまり年度をまたいで考えれば
本来受からない人間が（過去）受かって
受かるべき人間が（来年）落とされるってことじゃん
憲法違反じゃね？ 私立医はバカだが地方国立医もたいがいだぞ
東京育ちの私立医は少なくとも文化資本はあるわな。
勉強しかできない（くせに勉強もたいしてできない）田吾作医よりも下とは言い切れない >>318
裏口入学の５０人を除籍処分にしないかぎり、信頼の回復はないね。
つまり、いつまで経ってもシリツ医大卒＝裏口バカと汚名は拭えない。
シリツ出身者こそ、裏口入学に厳しい処分を訴えるべきなのに、
僕も裏口入学だよ、と自慢するのが、シリツのクオリティー。 >>316
ド底辺シリツ医大卒は自分が頭が悪いことすらわかってないぞ。
これが現実 １次方程式もできないド底辺シリツ医大卒の記録
http://imagizer.imageshack.com/img923/2715/RosCsf.jpg
ド底辺シリツ医大卒の裏口バカは自分が馬鹿だという自覚がないから、与えられた数値から計算できない、問題が悪いと言い張るんだよなぁ。悪いのはそいつの頭なのに。 おまけに自分が置かれている立場すら自覚していない。
東京医大の事件で点数加算の不正まで発覚しているのに、
>裏？
>そんなのあるかよばか
と言ってる椰子がいたな。
こいつも裏口入学したシリツ医だろうと推測されるね。
http://imagizer.imageshack.com/img924/4761/OuxS6x.jpg 裏口入学を公言した高須院長を根拠もなく特待生認定してソースを求められたときの対応がこれな。
ド底辺シリツ医大卒の裏口バカ医って
患者から診断や治療の根拠を求められたときも
こんな対応をしているのかな？
高須院長は特待生だという裏口バカの根拠なき主張に対して
ソース出せと言われた時ののやりとり。
http://imagizer.imageshack.com/img923/1194/h1BLms.jpg
http://imagizer.imageshack.com/img924/6420/5Yksm9.jpg
人間のクズだな。 いわゆる 勝ち組を自分の低いレベルまで引きずり落としたい人 >>324
ド底辺シリツ医大卒以下に堕ちるのは想像すらできん。
ナマポも避けたがるのがド底辺シリツ医大卒
実例↓
517 卵の名無しさん 2018/02/25(日) 11:36:00.56 ID:gq76tAvs
福岡のあの歯科大かな？
歯科口腔外科で抜歯依頼したら爺ちゃんが〇〇歯科大卒の先生は避けて下さいねがあった
けど。
この爺ちゃん、聖マリ卒の先生もよけて下さいと初診時に言ってた札付き爺さん。
生保受給者のくせにね。 >>325
>>167
>>165
>>158
出身校も言えないような奴って気持ち悪いぞ。
んで、あんたどこ卒？
これに答えられない馬鹿だと患者も大変だぞ。
はよ、答えてみ。
66 卵の名無しさん sage 2018/10/08(月) 09:22:57.88 ID:mQHuWxdH
ド底辺聖マ卒 頭悪すぎ
という意見がでてるぞ。 >>328
>>278
>>259
あんた、どこ卒？
これであっているのか？
66 卵の名無しさん sage 2018/10/08(月) 09:22:57.88 ID:mQHuWxdH
ド底辺聖マ卒 頭悪すぎ キルケゴール ニーチェ カント ヘーゲル フロイト ラカン フーコー デリダ 読んだ？ それと フッサールは読んだ？レビ ストロース 読んだ？構造主義って知ってるかな？ソーカル事件て知ってる？柄谷行人て知ってる？ あ ハイデガーとアドルノ ホルクマイヤー を忘れてたわw あとはチョムスキーな？ 構造主義はインパクトあったね フロイト マルクス ニーチェは当然読んでるよね 医学も含む学問の基本だよな？ こいつは教養ないな ちょこっといじれば知的レベルがバレるw 外人の名前に権威を見出す俗物精神
勉強はできても教養はない 問題が解けるとか
いろんなことを知ってるというだけでなく
それを知的な振る舞いに統合できて初めて教養と言うのだよね
テスト勉強とかポケモンの名前を全部覚えるとかなら子供でもできるわけで 知らないことは調べればいい、ただそれだけ。
こういうのは調べても出てこない。
まあ、計算スクリプトを俺がネットにあげたから調べれば出ては来るがな。
door to balloon timeが短縮するのに必要な計算。
診療所から病院に患者を救急搬送する。
病院から医師搭乗の救急車が診療所に向かっており１０時到着予定と連絡が入った。
患者の病態が悪化したら、診療所の普通車で病院に向かい救急車と出会ったら
救急車に患者を移して搬送し病院到着を急ぐという計画を立てた。
普通車から救急車への患者の乗り換えで１０分余分に時間がかかる。
道路事情から救急車は病院から診療所への道は
平均時速６０ｋｍで、逆方向は平均時速４５ｋｍで定速走行する。診療所の普通車は信号待ちもあり平均時速３０kmで定速走行する。
何時以降の病態悪化は診療所の車を使わずに救急車の到着を待つ方が病院に早く着くか？ 東京医大、本来合格者入学許可へ 今年の受験生５０人
2018年10月25日 02時06分
東京医科大＝８月、東京都新宿区
東京医科大が今年の入試で本来合格ラインを上回っていたのに、不正の影響で不合格となった受験生５０人に対し、来年４月の入学を認める方針を固めたことが２４日、関係者への取材で分かった。
昨年の本来合格者１９人については、難しいとの意見が出ているもようだ。東京医大は５０人のうち入学希望が多数に上った場合は、来年の一般入試の募集人員減も検討。
https://www.nishinippon.co.jp/sp/nnp/national/article/460101/
https://www.tokyo-med.ac.jp/med/enrollment.htmlによると
学年 第1学年 第2学年
在学者数 133 113
昨年入学者の留年者や退学者が０として、
大学が公式認定した裏口入学者が少なくとも今年は１３３人中５０人、昨年が１１３人中１９人ということになる。
裏口入学率の期待値、最頻値、およびその９５％信頼区間を求めよ。 医師国家試験って検索できれば小学生でも正答できるね。
医師国家試験
http://imagizer.imageshack.com/img924/473/MbI2Cc.jpg
こっちの方が難しい
問題
０，１，２だけを並べて整数を作っていきます。 ただし、左端には０はこないようにして、右端は必ず０にします。 また、となりあった数は異なるようにします。 このとき次の問に答えなさい。 （１）５けたの整数は何通り作れますか。
（２）８けたの整数は何通り作れますか。 一次方程式なしで解ける問題
マイクロソフトの入社試験問題
ボートに乗って、手荷物を船外に放り出すと、水位は上がるか、下がるか
あるブログで
>正解は「手荷物が浮くならば、全体の水位に変化はなく、手荷物が沈むならば水位は下がる。」
>意地悪な問題だな。
というのを読んだ。
答だけ覚えても楽しくないので荷物が沈むときどれだけ水位が低下するか計算してみる。
池の面積をA、水の比重は１、
手荷物の体積をV、比重とｇとすると
水位はV(g－１)/A下がる。
中学入試程度の問題だが、医師国家試験よりずっと難しいね。
ド底辺シリツ医大卒の裏口バカ排除にこういう基礎学力を試す問題をだせばいいのに。 >>344
問題が解ける以前の低学力がシリツ医大卒。
算数の掛け算すら怪しいのがシリツ医がこういう事故を起こすわけなんだな。
http://i.imgur.com/ArPaux9.png >>330
たぶんそれ本を読んだと言うだけでニーチェの真意は理解してないと思う。
ましてや読んだのは翻訳した書物でしょ。
原文で読まないと著者の真意は分からないと思うよ。
帝京大卒くらいの基礎学力じゃなかなか理解するのは難しいと思う。
専門医と同じ。
マルチプルチョイスの専門医試験に受かったからといって、
みんながみんな実力があるとは限らない。
巷には実力の無い名前だけ専門医がウヨウヨいるのと同じｗ 普通は教育投資すればある程度の学力は身につく。
シリツ医大の高額学費が払える経済環境で教育投資したはず。
それでもド底辺シリツ医大にしか入れないのはそういうことだｗ． シリツＡ医大、シリツＢ医大で試験をしたところ、裏口学生の平均点も正規学生の平均点もＡ医大の方が上だったのに
裏口正規合わせての平均点はＢ医大の方が上だったという。
このようなことがありえるのだろうか？ >>217
Haskellに移植してexeファイルにコンパイルしてコマンドラインから実行できるようにした。
import System.Environment
import Data.List
import Data.List.Split
combinations :: Int -> [a] -> [[a]]
combinations 0 _ = [ [] ]
combinations n xs = [ y:ys | y:xs' <- tails xs, ys <- combinations (n-1) xs']
main = do
argList <- getArgs -- m : 縦マス(短軸） n : 横マス(長軸) k : 宝の数
let m = read (argList !! 0)
n = read (argList !! 1)
k = read (argList !! 2)
q = [0..m*n-1]
matQ = chunksOf n q
matP = transpose matQ --行列を転置して
p = concat matP -- 配列に変換
treasure = combinations k q -- 宝の組み合わせ
ip y = minimum $ map(\x -> elemIndices x p!!0) y -- 宝の、配列ｐでのindex列を求めて最小値を返す
iq y = minimum $ map(\x -> elemIndices x q!!0) y
idxp = map ip treasure -- 宝の組み合せで実行して
idxq = map iq treasure
p_q = zipWith (-) idxp idxq -- 差をとって大小判別
p1st = length $ filter (<0) p_q -- 短軸方向探索ｐが先に宝をみつける
q1st = length $ filter (>0) p_q
draw = length $ filter (==0) p_q
putStrLn $ "p1st = " ++ show p1st ++ ", q1st = " ++ show q1st ++ ", draw = " ++ show draw きちんと動いていて( ・∀・)ｲｲ!! これで安眠できる。
>treasure 5 6 9
p1st = 4130886, q1st = 4139080, draw = 6037184 -- 全部の宝を先にみつけた方が勝者とするように書き換えてみた
import System.Environment
import Data.List
import Data.List.Split
combinations :: Int -> [a] -> [[a]]
combinations 0 _ = [ [] ]
combinations n xs = [ y:ys | y:xs' <- tails xs, ys <- combinations (n-1) xs']
main = do
argList <- getArgs -- m : 縦マス(短軸） n : 横マス(長軸) k : 宝の数
let m = read (argList !! 0)
n = read (argList !! 1)
k = read (argList !! 2)
q = [0..m*n-1]
matQ = chunksOf n q
matP = transpose matQ --行列を転置して
p = concat matP -- 配列に変換
treasure = combinations k q -- 宝の組み合わせ
ip y = maximum $ map(\x -> elemIndices x p!!0) y -- 宝の、配列ｐでのindex列を求めて最小値を返す
iq y = maximum $ map(\x -> elemIndices x q!!0) y
idxp = map ip treasure -- 宝の組み合せで実行して
idxq = map iq treasure
p_q = zipWith (-) idxp idxq -- 差をとって大小判別
p1st = length $ filter (<0) p_q -- 短軸方向探索ｐが先に宝をみつける
q1st = length $ filter (>0) p_q
draw = length $ filter (==0) p_q
putStrLn $ "p1st = " ++ show p1st ++ ", q1st = " ++ show q1st ++ ", draw = " ++ show draw >>360
1: It is not the bottom medical school but its enrollee that is despicable, which deserves to be called a bona fide moron beyond redemption.
ド底辺シリツ医大が悪いのではない、本人の頭が悪いんだ。
というのがド底辺シリツ医大卒の第一法則なのだが、
不正が発覚した学生を除籍処分にしないシリツ医大もクズだよなぁ。 >>356
数学板でc++に移植したコードが投稿された。
面白い問題をみると解決せずにはいられない人達に感謝。
shape(5x6), tcount=15 ---> pwin:25463979, qwin:25488051,even:104165490
シミュレーションと比較してみる。
> p=25463979
> q=25488051
> e=104165490
> c(p,q,e)/(p+q+e)
[1] 0.1641593 0.1643145 0.6715263
母集団１億５千万から１０万のサンプリングなのでまずまずの近似だな。
> c(p1st_sim=mean(re15<0),q1st_sim=mean(re15>0),draw_sim=mean(re15==0))
p1st_sim q1st_sim draw_sim
0.16354 0.16515 0.67131 いつも最後はcプログラマーのお世話になるなぁ。
お気楽言語で四苦八苦しているのを示すと
月光仮面のように現れてcのコードを投稿してくれる。
今回はc++なのでついていけそうもない。 >>355
B医大は裏口の割合が少なかった。
B医大の正規学生はA医大の正規学生に負けていたが、Aの裏口よりはずっと高かった >>365
数字を伴った具体例が出せないとは、さてはシリツだな。 >>363
最適化された算出法のPythonでのコードが投稿されて
>PythonをHaskellにすればいい
>Haskellにもリスト内包表記があるんだから
とのアドバイスを頂いた。まさに移植の核心をつく助言だったな。サッカーでいうキラーパスだぜ。
import System.Environment
choose (n,r) = product[1..n] `div` product[1..n-r] `div` product[1..r]
nloc m n k l = do
let q = div (n*k+l) m
r = mod (n*k+l) m
in (n-q)*(m-k) + q-1-l + if r>k then k-r else 0
nwin m n c = sum[choose ((nloc m n k l), c-1) | k<-[0..m-1], l<-[0..n-1], k*(n-1) < l*(m-1)]
mwin m n c = sum[choose ((nloc n m k l), c-1) | k<-[0..n-1], l<-[0..m-1], k*(m-1) < l*(n-1)]
draw m n c = choose(m*n,c) - nwin m n c - mwin n m c
main = do
argList <- getArgs -- m : 縦マス(短軸） n : 横マス(長軸) k : 宝の数
let m = read (argList !! 0)
n = read (argList !! 1)
k = read (argList !! 2)
putStrLn $ "p1st = " ++ show(mwin m n k) ++ ", q1st = " ++ show(nwin m n k) ++ ", draw = " ++ show(draw m n k) コンパイルしてコマンドラインで動作するようにしたの汎用性があって( ・∀・)ｲｲ!!
コンパイルできて不定長整数が扱えるHaskellならではだな。
こういうのも瞬時に計算してくれた、１０×２０部屋に宝箱１００個
>takara 10 20 100
p1st = 15057759425309840160151925452579572328997602171271937639470,
q1st = 15057796557877993527038542474310161591275806044157319150135,
draw = 60432921540347294111327092128863840691952977587098698541050 >>367
{-
数学板で drawのtypo を指摘されてたのでデバッグ版を再度アップ。
数学板は細かいところまできちんと読んでいてくれる人がいて( ・∀・)ｲｲ!!
-}
import System.Environment
choose (n,r) = product[1..n] `div` product[1..n-r] `div` product[1..r]
nloc m n k l = do
let q = div (n*k+l) m
r = mod (n*k+l) m
in (n-q)*(m-k) + q-1-l + if r>k then k-r else 0
nwin m n c = sum[choose ((nloc m n k l), c-1) | k<-[0..m-1], l<-[0..n-1], k*(n-1) < l*(m-1)]
mwin m n c = sum[choose ((nloc n m k l), c-1) | k<-[0..n-1], l<-[0..m-1], k*(m-1) < l*(n-1)]
draw m n c = choose(m*n,c) - nwin m n c - mwin m n c
main = do
argList <- getArgs -- m : 縦マス(短軸） n : 横マス(長軸) k : 宝の数
let m = read (argList !! 0)
n = read (argList !! 1)
k = read (argList !! 2)
putStrLn $ "p1st = " ++ show(mwin m n k) ++ ", q1st = " ++ show(nwin m n k) ++ ", draw = " ++ show(draw m n k) >>368
１０×２０部屋に宝箱１００個の計算も修正
p1st = 15057759425309840160151925452579572328997602171271937639470
q1st = 15057796557877993527038542474310161591275806044157319150135
draw = 60432958672915447478213709150594429954231181459984080051715 14 x 15 宝105での算出値
Haskell
15050058965790721521451955450789741426719541629904231171092323
15050058987870020666175636678029765478346185590397736405532012
60392361586649265993221049300205393824371020946210111218855105
Python
15050058965790721521451955450789741426719541629904231171092323
15050058987870020666175636678029765478346185590397736405532012
60392361586649265993221049300205393824371020946210111218855105
C double参考値
15050058965790725315104920912133576716207522209102038099296256
15050058987870027325121443554283577687551916746692125429596160
60392361586649287873092121075176030813045740046471488224624640
HaskellとPythonは完全に一致 ２１０から１０５個選ぶ組み合わせは
90492479540310008180848641429024900729436748166512078795479440
通り {- 見づらいshellを起動するより、WinGHCiで対話型に算出しても速度は変わらないな。コンパイルしてコマンドラインから実行可能なようにもしておく-}
import System.Environment
choose (n,r) = product[1..n] `div` product[1..n-r] `div` product[1..r]
nloc m n k l = do
let q = div (n*k+l) m
r = mod (n*k+l) m
in (n-q)*(m-k) + q-1-l + if r>k then k-r else 0
nwin m n c = sum[choose ((nloc m n k l), c-1) | k<-[0..m-1], l<-[0..n-1], k*(n-1) < l*(m-1)]
mwin m n c = sum[choose ((nloc n m k l), c-1) | k<-[0..n-1], l<-[0..m-1], k*(m-1) < l*(n-1)]
draw m n c = choose(m*n,c) - nwin m n c - mwin m n c
takara m n k = do
putStrLn $ "短軸p1st = " ++ show(mwin m n k)
putStrLn $ "長軸q1st = " ++ show(nwin m n k)
putStrLn $ "同等draw = " ++ show(draw m n k)
main = do
argList <- getArgs -- m : 縦マス(短軸） n : 横マス(長軸) k : 宝の数
let m = read (argList !! 0)
n = read (argList !! 1)
k = read (argList !! 2)
putStrLn $ "p1st = " ++ show(mwin m n k) ++ ", q1st = " ++ show(nwin m n k) ++ ", draw = " ++ show(draw m n k)
{-Prelude> takara 10 20 100
短軸p1st = 15057759425309840160151925452579572328997602171271937639470
長軸q1st = 15057796557877993527038542474310161591275806044157319150135
同等draw = 60432958672915447478213709150594429954231181459984080051715-} 数学板の質問スレに投稿していたら、勝率確率の算出プログラムをPythonからHaskellに移植せよとの課題が出された。
プログラム練習がてらに回答したら
引き分け計算式を間違えているとの指摘が返ってきた。
https://rio2016.2ch.net/test/read.cgi/math/1540218853/312-314
きちんと読んでもくれているんだなあと感心した。 今月国連WHOで解禁されようとしている医療大麻オイル
https://plaza.rakuten.co.jp/denkyupikaso/diary/201806090001/
医薬品としてはEpidiolexの名で承認されてます
国連で解禁されると日本の大麻取り締まり法がなくなるか、最低でも4条が改正され病院でも処方できるようになります ほんと裏口私立医ばかり
順天とか昭和とか東京医とか馬鹿ばっかｗ 広島県の福山友愛病院で、
患者の病状と関係ない薬を大量に投与した。
しかも、意図的にです！
国は違うがドイツの場合
↓
裁判所で開かれた公判で、患者１００人を殺害した罪を認めた。これでこの事件は、同国で戦後最悪級の連続殺人事件となった。
起訴されたのは、ドイツ北部デルメンホルストとオルデンブルクの病院で看護師をしていたニルス・ヘーゲル受刑者（４１）。
当時勤務していたドイツ北部の２つの病院で２０００～２００５年にかけ、３４～９６歳の患者を殺害したことを認めた。
同受刑者は自分の蘇生措置の腕を同僚に見せびらかす目的や、退屈しのぎの目的で、
↓↓↓↓↓
患者に処方されていない薬を投与していたとされる。
↑↑↑↑↑
ドイツの場合。まあ日本は日本だが・・・
大口の病院は看護士の単独犯だったわけで捕まったが・・・
福山友愛病院は・・・・・
https://youtu.be/BnHYCZqyZKY 内視鏡学会で今日は代診バイト、コストパフォーマンスが良くて( ・∀・)ｲｲ!!。
ステーキハウスを予約した。 医学部入試不正はなぜ私立大学ばかり…背景に何が？
中原一歩2018.11.2 11:30AERA
東京医科大に慰謝料と入試成績の開示などを求めて会見した弁護団。
会見には顔と実名をさらして現役医大生も参加した （ｃ）朝日新聞社
また補欠合格者の選定でも、臼井前理事長が学務課職員に指示し、
名簿で上位の5人を飛ばす形で、特定の受験生に電話連絡し、繰り上げ合格させていた。この5人はいずれも女性だった疑いがある。
驚くのは明らかな「性別」や「学歴」による「差別」を、
「調整」という言葉で正当化してきた大学側の意識だ。
一般常識とはかけ離れた「医学部ムラ」の論理は東京医大に限ったものではないと
社会学者・新雅史氏は指摘する。
また、こうした不祥事が私立大学で続いていることについて、国立大学に比べ、私立大学が圧倒的に経営のガバナンスが厳しく、
結果、理事長など経営陣の意向が入学試験にも反映されやすいからではないかと推測する。
「最先端の医療研究を主体とする国立大学に比べ、
大学経営の中心が臨床である私立大学では、理事会の意向を忖度し、
忠実に働いてくれる研修医が必要不可欠。
卒業後も大学病院で即戦力として長く働いてくれる人材を探している。
また手術を手がける外科を中心とする医局は、いまだに男の戦場という認識が強い。
老舗の医科大ほど手術室における女性の割合を気にする傾向がある」（新氏） 広島県の福山友愛病院で、
患者の病状と関係ない薬を大量に投与した。
しかも、意図的にです！
国は違うがドイツの場合
↓
裁判所で開かれた公判で、患者１００人を殺害した罪を認めた。これでこの事件は、同国で戦後最悪級の連続殺人事件となった。
起訴されたのは、ドイツ北部デルメンホルストとオルデンブルクの病院で看護師をしていたニルス・ヘーゲル受刑者（４１）。
当時勤務していたドイツ北部の２つの病院で２０００～２００５年にかけ、３４～９６歳の患者を殺害したことを認めた。
同受刑者は自分の蘇生措置の腕を同僚に見せびらかす目的や、退屈しのぎの目的で、
↓↓↓↓↓
患者に処方されていない薬を投与していたとされる。
↑↑↑↑↑
ドイツの場合。まあ日本は日本だが・・・
大口の病院は看護士の単独犯だったわけで捕まったが・・・
福山友愛病院は・・・・・
https://youtu.be/BnHYCZqyZKY >>373
P（短軸探索）が先、Q（長軸探索）、同時 の配置を表示するスクリプトを書いてみた。
数値を変えて実行できる。
ｍ：短軸 ｎ：長軸 ｋ：宝の数
http://tpcg.io/1woIN1
treasure_map(2,3,2)
P1st Q1st even
4 5 6
P (= long axis searcher) finds first.
■ ■ □
□ ■ ■
■ ■ ■
□ □ ■
■ ■ ■
□ ■ □
■ ■ ■
■ □ □ Q (= short axis searcher) finds first.
■ □ □
■ ■ ■
■ □ ■
■ □ ■
■ □ ■
■ ■ □
■ ■ □
■ □ ■
■ ■ □
■ ■ □
Draw.
□ □ ■
■ ■ ■
□ ■ □
■ ■ ■
□ ■ ■
□ ■ ■ 真の論理力は、プログラミング技能で試されるといっても過言ではない。
論理的に完璧でなければプログラムは動かない代物だからだ。プログラムのバグが取り切れないうちは論理力などないに等しいと思った方がよい。
https://www.mag2.com/p/news/363603/2/ 👀
Rock54: Caution(BBR-MD5:7bff9ed63942b4cd01610d20b2c06e65) 血液型でもいいんだが、このスレの趣旨に合わせた問題。
ド底辺シリツ医大では正規入学：縁故入学：裏口入学：ガチ裏入学の比率が４：３：２：１であったとする。
正規入学の学生を一人みいだすために必要な学生数の期待値はいくらか？ ド底辺シリツ医大が寄付金の多寡で合格させているのを隠蔽するために裏口受験生用にクジを導入した。
クジは合格、小吉、中吉、大吉の４枚がある。
合格を引いたら寄付金は０、
小吉は寄付金を1000万を支払って合格がでるまでクジを引き続ける
中吉は寄付金を2000万を支払って合格がでるまでクジを引き続ける
大吉は寄付金を3000万を支払って合格がでるまでクジを引き続ける
途中で中止することはできない
裏口受験生が合格するのに必要な寄付金の期待値を求めよ。 >>385
>385のクジを引く確率は合格１０％小吉２０％中吉３０％大吉４０％に設定されているとする。
裏口受験生が合格するのに必要な寄付金の期待値を求めよ。 >>386
解析解は計算式1行で終わって味気ないのでシミュレーションで算出してみた
> sim <- function(b=2/10,c=3/10,d=4/10,B=1000,C=2000,D=3000){
+ a=1-(b+c+d)
+ br=c(0,B,C,D)
+ total=x=sample(br,1,prob=c(a,b,c,d))
+ while(x!=0){
+ x=sample(br,1,prob=c(a,b,c,d))
+ total=total+x
+ }
+ total
+ }
> re=replicate(1e3,mean(replicate(1e3,sim())))
> summary(re)
Min. 1st Qu. Median Mean 3rd Qu. Max.
17583 19539 20000 20006 20470 22049 暇つぶしネタ
ド底辺シリツ医大受験生の親に裏口コンサルタントが訪れて裏金額に２つの決め方を提示した。
A: 定額で２０００万円
B: サイコロを１の目がでるまでふったときの出た目を合計した値 × １００万円、 例 ２,１と続けば３００万、６，５，１なら１２００万円
問題（１） AとBではどちらが有利か？
問題（２） Bを選択した場合５０００万円以上必要になる確率はくらか？ pythonを学ぼうとanacondaのインストール（容量が少なくなったのでSDカードのD：ドライブへインストール）を試みたら
これと全く同じ現象が出現
https://stackoverflow.com/questions/41768604/anaconda-install-on-windows-is-stuck-on-executing-install-py
結局、ｃドライブにインストールにしたら問題なく終了できた。時間が無駄になったよ。 It is common knowledge among doctors and patients that Do-Teihen(exclusively bottom-leveled medical school) graduates mean morons who bought their way to Gachi'Ura(currently called by themselves)
According to the experience of entrance exam to medical school in the era of Showa, when the sense of discrimination against
privately-founded medical schools were more intense than it is now,
all such schools but for Keio had been so compared to some specialized institution for educable mentally retarded kids that nobody but imbecile successors of physicians in private practice had applied for admission.
There had been NOT a single classmate who chose willingly against his/her common sense to go to the Do-Teihen(exclusively bottom-leveled medical school, currently also known as Gachi'Ura),
which would have cost outrageous money and its graduates are destined to be called Uraguchi morons who bought thier way into the Do-Teihen, by thier colleagues and even by thier own clients.
Although people won't call them names to their face,
certain 80-90% people of about my age have been yet scorning and sneering at Uraguchi graduates, speaking in the back of our mind,
" Uraguchi morons shall not behave like somebody."
We never speak out face to face in real life. import Data.List
firstUnavailable x = let y = 0:x in head $([1..71] \\)$nub$sort$[a+b+c|a<-y,b<-y,c<-y]
next x = [n:x|n<-[head x+1..firstUnavailable x]]
xss = iterate (\xs->concat [next x|x<-xs]) [[1]]
isGood x = let y = 0:x in (==70)$length $intersect [1..70]$nub$sort$[a+b+c|a<-y,b<-y,c<-y]
main = do
print [x|x<-(xss !! 6),isGood x] import Data.List
m = 69
sub x = do -- ans=[1,4,5,15,18,27,34]
let ijk = filter (<=70).nub $ sort [i+j+k| i<-x,j<-x,k<-x]
all (\y -> elem y ijk ) [0..70]
main = do
-- print $ [(1,4,5,e,f,g,h)| e<-[0..m],f<-[e..m],g<-[f..m],h<-[g..m],sub [0,1,4,5,e,f,g,h]] -- 動作確認用
print $ [(1,c,d,e,f,g,h)| c<-[1..m],d<-[c..m],e<-[d..m],f<-[e..m],g<-[f..m],h<-[g..m],sub [0,1,c,d,e,f,g,h]] 高樹沙耶さんが大麻所持で逮捕された時に、
「医療大麻なんてありません！」と医者の権益保護に躍起になっていた西川史子の現在(笑)
https://goo.gl/images/QdCXwC
あははははは！ざまー(笑)
ガンかエイズか？
外国行って医療大麻吸った方が良いんじゃね？(笑) 救急車2台受けて新入院２人で諭吉２枚ゲット、
買いたい医学書もないなぁ。
ネット検索でたいていことが足りる。
こういう基礎学力が問われる問題は検索じゃ無理だな。
インフルエンザの迅速キットは特異度は高いが感度は検査時期によって左右される。
ある診断キットが開発されたとする。
このキットは特異度は９９％と良好であったが、
感度については確かな情報がない。
事前確率分布として一様分布を仮定する。
５０人を無作為抽出してこの診断キットで診断したところ４０人が陽性であった。
この母集団の有病率の期待値と９５％ＣＩはいくらか？
またこの診断キットの感度の期待値と９５％ＣＩはいくらか これ無茶苦茶難問だった。
サイコロを１０００回ふったとき１２３４５６の順に並ぶ目がある確率は？ >>397
シミュレーションはことの他の簡単。
diseq=function(x) grepl("123456",paste(sample(6,x,rep=T),collapse=''))
mean(replicate(1e7,diseq(1000))) >>397
分数表示するとこうなるらしい。
29894670002765580717622018953762664878384906585883227072416001286367327613872462
36176982687935042063489589508768499096701653359496110507628202771697652461481898
15867083862983975849719649919755556602395081603445217810191450771872978378492822
20929434295896536747523490245609702844253652551469152963247478735449528154607738
94897010212340239653386134088594267247751133592603591616944486751154360658915673
06079634567518636788329151870647053752023096491715169208527344676777484044463919
37957902455021334206833507250332593780127396266576899688383930527654264882692836
52659851277089138926126233125349416055818289864095231536195189335702592341232170
57986389166894334399077869160455544669456052004648395254763440350805452857924718
777798944034868387931340048957755897293189482452979797088/6^1000
≒0.021102960211841870224... >>397
Haskellで瞬時に算出されてしまった。
import Data.List
import Data.Ratio
ps = map head $ iterate (\x->(tail x) ++ [x!!5 - 1%(6^6) * x!!0]) [1%1,1%1,1%1,1%1,1%1,1%1-1%(6^6)]
main = do
print $ fromRational $ 1%1 - (ps !! 999)
Prelude> :main
2.110296021184187e-2 >>400
コードを反芻したら漸化式をプログラムしただけと理解できたのでRに移植。
実数計算なので誤差がでる。
f = function(N){
p=numeric()
p[1]=p[2]=p[3]=p[4]=p[5]=p[6]=1
for(n in 7:(N+1)){
p[n]=p[n-1]-p[n-6]/(6^6)
}
1-p[N+1]
}
> f(1000)
[1] 0.02110296 表示桁を増やしてみた。
> options(digits=22)
> f(1000)
[1] 0.0211029602118424364221 サイコロを１００００回ふったとき１２３４５６の順に並ぶめがある確率は？
> f(10000)
[1] 0.1928556782249950529717
と算出できて気持ち( ・∀・)ｲｲ!!。 コインを１００万回投げた。連続して表がでる確率が最も高いのは何回連続するときか？
おい、ド底辺すべての場合は書き出して検証してくれ。 seq_dice <- function(N=100,k=5,p=1/6){
P=numeric(N)
for(n in 1:(k-1)){
P[n]=0
}
P[k]=p^k
P[k+1]=p^k+(1-p)*p^k
for(n in (k+1):(N-1)){
P[n+1] = P[n] + (1-P[n-k])* p^(k+1)
}
return(P[N])
}
seq_dice()
seq_diceJ <- function(N=100,k=5,p=1/6){ # Just k sequence
seq_dice(N,k,p)-seq_dice(N,k+1,p)
}
seq_diceJ()
#
vsdJ=Vectorize(seq_diceJ)
NN=10^6
kk=1:30
p=0.5
y=vsdJ(NN,kk,0.5)
which.max(y)
plot(kk,y,bty='l',pch=19,xlab='sequence',ylab='probability') ド底辺シリツ医大卒の裏口バカのカウントが終わりそうもないので、
シミュレーションのコードも書いてみた。
# simulation
mhs = function(x){ # maximum head sequence
y=paste(x,collapse='')
str="1"
if(!grepl(str,y)) return(0)
else{
while(grepl(str,y)){
str=paste0(str,"1")
}
return(nchar(str)-1)
}
}
(x=sample(0:1,100,rep=T)) ; mhs(x)
sim <- function(n){
mhs(sample(0:1,n,rep=T))
}
re=replicate(1e3,sim(10000))
hist(re,col='lightblue',main='',ann=F,freq=F)
summary(re)
which.max(tabulate(re))
max(tabulate(re))/length(re) コインを１００万回投げた。連続して表がでる確率が最も高いのは何回連続するときか？
おい、ド底辺すべての場合は書き出しは終わったか？
最大値をとるときの確率は 0.23685397402052999 になったが あってるか？
数字を０と１を書いて数を数えるだけだぞ。
ド底辺シリツ医大へ裏口入学でも数くらいは数えられるだと？ We hold these truths to be self-evident, that all "uraguchi" are created retards,
That they are endowed by their creator with certain unalienable traits, that among these are sloth, mythomania, and the pursuit of imbecility.
That to rectify these traits, Bottom Medical Schools (BMS) are instituted for retards, deriving their just powers from what has been referred as the arbitrary donation of the parents of the rectified,
That whenever any form of the retards becomes destructive of rectification,
it is the right of the BMS to suspend or expel them, and to impose additional tuition laying its foundation on such principles and organizing its powers in such form, as to them shall seem most likely to effect the profit of BMS . サイコロを１万回ふって１の目が５回以上続く確率の計算結果
3477607490736723/18014398509481984
= 0.19304599534124128
おい、ド底辺実験して実証してみろ。
目の出方、６の１万乗を列挙して数えるのでもいいぞ。 Prudence, indeed, will dictate that "uraguchi" long established cannot be changed for light and transient causes;
and accordingly all experience has shown, that BMS are more disposed to suffer, while evils are sufferable, than to right themselves by abolishing the forms from which they can pursue profit.
But when a long train of misbehavior and misconduct , showing invariably the same Imbecility evinces a design to reveal themselves as absolute Bona Fide Moron ,
it is their right, it is their duty, to expel such "uraguchi", and to provide new guards for their future security. It is common knowledge among doctors and patients that Do-Teihen(exclusively bottom-leveled medical school) graduates mean morons who bought their way to Gachi'Ura(currently called by themselves)
According to the experience of entrance exam to medical school in the era of Showa, when the sense of discrimination against
privately-founded medical schools were more intense than it is now,
all such schools but for Keio had been so compared to some specialized institution for educable mentally retarded kids that nobody but imbecile successors of physicians in private practice had applied for admission.
There had been NOT a single classmate who chose willingly against his/her common sense to go to the Do-Teihen(exclusively bottom-leveled medical school, currently also known as Gachi'Ura),
which would have cost outrageous money and its graduates are destined to be called Uraguchi morons who bought thier way into the Do-Teihen, by thier colleagues and even by thier own clients.
Although people won't call them names to their face,
certain 80-90% people of about my age have been yet scorning and sneering at Uraguchi graduates, speaking in the back of our mind,
" Uraguchi morons shall not behave like somebody."
We never speak out face to face in real life. >>411
現在も通用する、不朽の名投稿
(quote)
私は昭和の時代に大学受験したけど、昔は今よりも差別感が凄く、慶応以外の私立医は特殊民のための特殊学校というイメージで開業医のバカ息子以外は誰も受験しようとすらしなかった。
常識的に考えて、数千万という法外な金を払って、しかも同業者からも患者からもバカだの裏口だのと散々罵られるのをわかって好き好んで私立医に行く同級生は一人もいませんでした。
本人には面と向かっては言わないけれど、俺くらいの年代の人間は、おそらくは８－９割は私立卒を今でも「何偉そうなこと抜かしてるんだ、この裏口バカが」と心の底で軽蔑し、嘲笑しているよ。当の本人には面と向かっては絶対にそんなことは言わないけどね。
(unquote) >>401
有理数（分数表示）したいのでPythonに移植
from fractions import Fraction
def dice126(N):
P=list()
for n in range(6):
P.append(1)
P.append(1-1/(6**6))
for n in range(7,N+1):
P.append(P[n-1]-P[n-6]/(6**6))
return(1-P[N])
def dice123456(N):
print(Fraction(dice126(N)))
print(" = " + str(dice126(N)))
dice123456(1000) >>405
# 有理数表示したかったのでPythonに移植
from fractions import Fraction
def seq_dice(N,k,p):
P=list()
for n in range(k-1):
P.append(0)
P.append(p**k)
P.append(p**k + (1-p)*p**k)
for n in range (k,N):
P.append(P[n]+(1-P[n-k])*p**(k+1))
return(P[N])
def seq_diceJ(N,k,p):
return(seq_dice(N,k,p) - seq_dice(N,k+1,p))
def dice(N,k,p):
print("Over " + str(k))
print(Fraction(seq_dice(N,k,p)))
print(" = " + str(seq_dice(N,k,p)))
print("Just " + str(k))
print(Fraction(seq_diceJ(N,k,p)))
print(" = " + str(seq_diceJ(N,k,p)))
dice(10000,5,1/6)
# http://tpcg.io/rMOVCB # how to deal list in R
> a=NULL
> a[3]=3
> a
[1] NA NA 3
> a[1]
[1] NA
> for(i in 1:10) a[i]=as.character(i)
> a
[1] "1" "2" "3" "4" "5" "6" "7" "8" "9" "10"
> b[2]=2
Error in b[2] = 2 : object 'b' not found
> # hiw to deal list in python
a=[]
for i in range(10):
a.insert(i,i)
print (a)
for i in range(10):
a[i]=i*i
print(a)
b=[0]*10
for i in range(10):
b[i]=str(i)
print (b)
del a[-3:-1]
print(a)
del b[0:2]
print(b)
# Error!
c=[]
for i in range(10):
c[i]=i
print (c) これ面白かった。
>半径3の円Pの外側に接している半径1の円QはPを一周するといくら回転しますか。
数値は違うけど100円玉２個使って２回転を実験しちゃったよ。 ド底辺シリツ医大の裏口入学調査委員会が
裏口入学は高々10%と報告したとする。
その結果の検証に100人を調査したら少なくとも4人続けて裏口入学生であった、という。
この検証から裏口入学率が10%であるか否かを有意水準1%で検定せよ。
漸化式から算出すると 0.008705348
https://egg.5ch.net/test/read.cgi/hosp/1540905566/61
検証のためにシミュレーションスクリプトを書いてみた。
起こる回数の少ない事象の確率を頻度で近似するにはシミュレーション回数が増えるなぁ。
m1s <- function (x) { # max one sequence c(1,1,0,1,1,1,0,0) => 3
if(sum(x)==0) return(0)
chg <- c(TRUE, diff(x) != 0)
chgidx <- c(which(chg), length(x)+1)
run.length <- diff(chgidx)
true.length <- run.length[x[chg] == 1]
max(true.length)
}
prob=c(9/10,1/10)
re1=replicate(1e6,m1s(sample(0:1,100,rep=T,prob=prob)))
summary(re1) ; hist(re1,col='pink')
> mean(re1>=4)
[1] 0.008875
有効数字１桁で近似ｗまあ、１％未満であるのは一致したな。
理論値を分数で計算したいなぁ、Pythonを勉強するかなぁ。 ピタゴラス数の問題に嵌ってしまったぜい。
Haskellの練習課題dにいいな。
Prelude> m=50
Prelude> ps=[(a,b,c)|a<-[1..m],b<-[a..floor(m^2/2-1/2)],c<-[b..2*b],a^2+b^2==c^2]
Prelude> ps !! 99 a^2+b^2=c^2を満たす3つの整数（a<b<c）
の組み合わせのうち（3,4,5）から数えて7番目は何になるかという問題がわかりません
鈍足のRでも計算できた（ド底辺シリツ医大卒には無理だろな）
> pita[7,]
a b c
9 40 41
> pita[77,]
a b c
42 56 70
> pita[777,]
a b c
216 288 360 >>423
こういう問題はシミュレーションで確信がもてないので嫌だね。
他の人が同じ答を出したら確信に繋がる。
でも、それがド底辺シリツ医大卒だと確信にはならんよなぁ。
薬剤を無駄にしないために非定型的な希釈をするときは国立卒の薬剤師に検算依頼しているね。
ド底辺シリツ医大卒なんぞは信頼できんよ。 高樹沙耶さんが大麻所持で逮捕された時に、
「医療大麻なんてありません！」と医者の権益保護に躍起になっていた西川史子の現在(笑)
https://goo.gl/images/QdCXwC
あははははは！ざまー(笑)
ガンかエイズか？
外国行って医療大麻吸った方が良いんじゃね？(笑)
ヒャッハー！
米国ミシガン州 住民投票
嗜好用大麻 合法化成る！
https://www.sankei.com/smp/world/news/181107/wor1811070026-s1.html
ヒャッハー！
大麻株、絶好調！
https://web.smartnews.com/articles/fntjnjRwVEe coin5 = function(x,n=5) any(diff(cumsum(x),n)==n)
mean(replicate(1e4,coin5(rbinom(100,1,0.5))))
数学板のRのスレにgrep使ったスクリプトをあげたら
別アルゴリズムで高速化してくれた。
頻度が小さい事象のシミュレーションは実行速度が問題になるのでありがたい。
ド底辺シリツ医大の裏口入学調査委員会が
裏口入学は高々10%と報告したとする。
その結果の検証に100人を調査したら4人以上続けて裏口入学生であった、という。
この検証から裏口入学率が10%であるか否かを有意水準5%で検定せよ。
実行速度比較
system.time(mean(replicate(1e5,any(diff(cumsum(rbinom(100,1,0.1)),4)==4))))
user system elapsed
19.210 0.050 21.897
>
> system.time(mean(replicate(1e5,with(rle(rbinom(100,1,0.1)), max(lengths[wh
<e(1e5,with(rle(rbinom(100,1,0.1)), max(lengths[which(values==1)])>=4))))
user system elapsed
42.360 0.020 43.736 ヒャッハー！
アメリカ中間選挙で大麻が大勝利！
全米で大麻肯定派知事が誕生！
2019年に医療大麻が全米で解禁される見込み！
https://forbesjapan.com/articles/detail/23808 >>420
import numpy as np
from fractions import Fraction
def seqNp(N = 10,K = 5,p = 0.5):
if N == K: return p**K
q = 1-p
a = [0]*(N+1)
for i in range(1,K+1):
a[i] = q/(p**(i))
for i in range(K,N):
a[i+1] = 0
for j in range(0,K):
a[i+1] = a[i+1]+a[i-j]
a[i+1] = q/p*a[i+1]
P0=[0]*(N+1)
for i in range(1,N+1):
P0[i] = a[i]*p**i
del P0[0]
MP = np.zeros([K,N])
MP[0] = P0
MP[1][0] = p
for i in range(K-3,K):
MP[i][0] = 0
for k in range(1,K):
for i in range(0,N-1):
MP[k][i+1] = p*MP[k-1][i]
re = 1-np.sum(MP,axis=0)
print(Fraction(re[N-1]))
print(re[N-1]) ヒャッハー！
アメリカ中間選挙で大麻が大勝利！
全米で大麻肯定派知事が誕生！
2019年に医療大麻が全米で解禁される見込み！
https://forbesjapan.com/articles/detail/23808 裏口学生を除籍処分にしないのだから、シリツ＝裏口の公式が成立だと思うね。
不正入学した学生を処分しろと積極的に発言すべきなのがシリツ卒だと思うのだが、「僕も裏口入学」と自慢するするのが追随してたよなぁ。 >>426
78410807303959/9007199254740992
0.008705348364830168
になるので有意水準１％でも棄却される。 ド底辺シリツ医大の裏口入学調査委員会が100人を順に調査したら連続して裏口学生と判明した最大数が4人と判明した。
これだけのデータから裏口入学確率の95%信頼区間を推定せよ。
数値解なら算出可能だな。
seq2pCI <- function(N,K){
vp=Vectorize(function(p)seqNp(N,K,p)-seqNp(N,K+1,p))
curve(vp(x),bty='l') ; abline(h=0.05,lty=3)
peak=optimize(vp,c(0,1),maximum=TRUE)$maximum
lwr=uniroot(function(x,u0=0.05) vp(x)-u0,c(0.01,peak))$root
upr=uniroot(function(x,u0=0.05) vp(x)-u0,c(peak,0.99))$root
c(lower=lwr,upper=upr)
}
seq2pCI(100,4)
> seq2pCI(100,4)
lower upper
0.1662099 0.5685943
と計算できて気分が( ・∀・)ｲｲ!! 西洋医学はオワコンです！
これからはガン治療もエイズ治療も医療大麻です！
ヒャッハー！
アメリカ中間選挙で大麻が大勝利！
全米で大麻肯定派知事が誕生！
2019年に医療大麻が全米で解禁される見込み！
https://forbesjapan.com/articles/detail/23808
高樹沙耶さんが大麻所持で逮捕された時に、
「医療大麻なんてありません！」と医者の権益保護に躍起になっていた西川史子の現在(笑)
https://goo.gl/images/QdCXwC
あははははは！ざまー(笑)
ガンかエイズか？
外国行って医療大麻吸った方が良いんじゃね？(笑)
ヒャッハー！
米国ミシガン州 住民投票
嗜好用大麻 合法化成る！
https://www.sankei.com/smp/world/news/181107/wor1811070026-s1.html
ヒャッハー！
大麻株、絶好調！
https://web.smartnews.com/articles/fntjnjRwVEe 開業医スレに答えられる頭脳はなさそう。
このスレにもいないだろうな。
ド底辺シリツ裏口調査団が100人を順次調査した。
裏口判明人数をそのまま公表はヤバすぎる結果であったため、
連続して裏口がみつかった最大数は4人であったとだけ公表した。裏口入学人数の95%信頼区間は？ 漸化式から確率計算、それを数値的に逆関数で求めたけど
もっとエレガントな方法があるんだろうな。 期待値（平均値）・最頻値なしで信頼区間でけ求めるのはカッコ悪いなぁ。
ド底辺シリツ裏口調査団が100人を順次調査した。
裏口判明人数をそのまま公表はヤバすぎる結果であったため、
連続して裏口がみつかった最大数は4人であったとだけ公表した。
公表結果が正しいとして裏口入学人数の期待値、最頻値、及び95%信頼区間を述べよ。
スクリプトに計算追加して期待値・最頻値も表示させることにした。
seq2pCI <- function(N,K,alpha=0.05){
vp=Vectorize(function(p)seqNp(N,K,p)-seqNp(N,K+1,p))
curve(vp(x),lwd=2,bty='l') ; abline(h=0.05,lty=3)
peak=optimize(vp,c(0,1),maximum=TRUE)$maximum
mean=integrate(function(x)x*vp(x),0,1)$value/integrate(function(x)vp(x),0,1)$value
lwr=uniroot(function(x,u0=alpha) vp(x)-u0,c(0.01,peak))$root
upr=uniroot(function(x,u0=alpha) vp(x)-u0,c(peak,0.99))$root
c(lower=lwr,mean=mean,mode=peak,upper=upr)
}
seq2pCI(100,4) seq2pCI <- function(N,K,alpha=0.05){
vp=Vectorize(function(p)seqNp(N,K,p)-seqNp(N,K+1,p))
curve(vp(x),lwd=2,bty='l') ; abline(h=0.05,lty=3)
peak=optimize(vp,c(0,1),maximum=TRUE)$maximum
mean=integrate(function(x)x*vp(x),0,1)$value/integrate(function(x)vp(x),0,1)$value
lwr=uniroot(function(x,u0=alpha) vp(x)-u0,c(0.01,peak))$root
upr=uniroot(function(x,u0=alpha) vp(x)-u0,c(peak,0.99))$root
c(lower=lwr,mean=mean,mode=peak,upper=upr)
}
seq2pCI(100,4)
# http://tpcg.io/asKRE9 >>440
これをPythonに移植するの敷居が高い。
Rの固有関数を使いまくり。
まあ、分数表示する必要がないし、処理速度も問題ないからモーティベーションもわかないし。 seq2pCI <- function(N,K,alpha=0.05){
vp=Vectorize(function(p)seqNp(N,K,p)-seqNp(N,K+1,p))
curve(vp(x),lwd=2,bty='l',xlab='Pr[head]',ylab=paste('Pr[max',K,'-head repetition]'))
abline(h=alpha,lty=3)
peak=optimize(vp,c(0,1),maximum=TRUE)$maximum
mean=integrate(function(x)x*vp(x),0,1)$value/integrate(function(x)vp(x),0,1)$value
lwr=uniroot(function(x,u0=alpha) vp(x)-u0,c(0.01,peak))$root
upr=uniroot(function(x,u0=alpha) vp(x)-u0,c(peak,0.99))$root
c(lower=lwr,mean=mean,mode=peak,upper=upr)
}
seq2pCI(100,5) >>439
連続して裏口がみつかった最大数を変化させて、裏口入学者数の期待値、最頻値、９５％信頼区間をグラフにしてみた。
https://i.imgur.com/3UwJnRV.jpg >>435
確率密度関数が左右対象でないから、
QuontileでなくHDI(Highest Density Interval)での95％信頼区間をpdfからｃｄｆの逆関数を作って算出してみる。
# pdfからcdfの逆関数を作ってHDIを表示
pdf2hdi <- function(pdf,xMIN=0,xMAX=1,cred=0.95){
nxx=1001
xx=seq(xMIN,xMAX,length=nxx)
xx=xx[-nxx]
xx=xx[-1]
xmin=xx[1]
xmax=xx[nxx-2]
AUC=integrate(pdf,xmin,xmax)$value
PDF=function(x)pdf(x)/AUC
cdf <- function(x) integrate(PDF,xmin,x)$value
ICDF <- function(x) uniroot(function(y) cdf(y)-x,c(xmin,xmax))$root
hdi=HDInterval::hdi(ICDF,credMass=cred)
c(hdi[1],hdi[2])
} seqNp <- function(N=100,K=5,p=0.5){
if(N==K) return(p^K)
q=1-p
a=numeric(N) # a(n)=P0(n)/p^n , P0(n)=a(n)*p^n
for(i in 1:K) a[i]=q/p^i # P0(i)=q
for(i in K:(N-1)){ # recursive formula
a[i+1]=0
for(j in 0:(K-1)){
a[i+1]=(a[i+1]+a[i-j])
}
a[i+1]=q/p*a[i+1]
}
P0=numeric(N)
for(i in 1:N) P0[i]=a[i]*p^i # P0(n)=a(n)*p^n
MP=matrix(rep(NA,N*K),ncol=K)
colnames(MP)=paste0('P',0:(K-1))
MP[,'P0']=P0
MP[1,'P1']=p
for(i in (K-2):K) MP[1,i]=0
for(k in 2:K){
for(i in 1:(N-1)) MP[i+1,k]=p*MP[i,k-1]
} # Pk(n+1)=p*P(k-1)(n)
ret=1-apply(MP,1,sum)
ret[N]
} 2つのサブルーチンを定義してから、
# N試行で最大K回連続成功→成功確率ｐの期待値、最頻値と95%HDI
# max K out of N-trial to probability & CI
mKoN2pCI <- function(N=100 , K=4 , conf.level=0.95){
pmf=Vectorize(function(p)seqNp(N,K,p)-seqNp(N,K+1,p))
mode=optimize(pmf,c(0,1),maximum=TRUE)$maximum
auc=integrate(pmf,0,1)$value
pdf=function(x) pmf(x)/auc
mean=integrate(function(x)x*pdf(x),0,1)$value
curve(pdf(x),lwd=3,bty='l',xlab='Pr[head]',ylab='density')
lu=pdf2hdi(pdf,cred=conf.level)
curve(pdf(x),lu[1],lu[2],type='h',col='lightblue',add=T)
re=c(lu[1],mean=mean,mode=mode,lu[2])
print(re,digits=4)
invisible(re)
}
> mKoN2pCI(100,4)
lower mean mode upper
0.1747676 0.3692810 0.3728936 0.5604309
> seq2pCI(100,4,0.05,T)
lower mean mode upper
0.1662099 0.3692810 0.3728936 0.5685943
はやり、HDIの方が信頼区間幅が小さいのがみてとれる。
まあ、四捨五入で人数計算すれば、推定裏口入学者数の数はほぼ同じ。 確率密度関数の面積からのクォンタイルでの信頼区間の計算
mKoN2pCIq <- function(N=100 , K=4 , alpha=0.05){
pmf=Vectorize(function(p)seqNp(N,K,p)-seqNp(N,K+1,p))
mode=optimize(pmf,c(0,1),maximum=TRUE)$maximum
auc=integrate(pmf,0,1)$value
pdf=function(x) pmf(x)/auc
curve(pdf(x),bty='l')
mean=integrate(function(x)x*pdf(x),0,1)$value
cdf=function(x) MASS::area(pdf,0,x)
vcdf=Vectorize(cdf)
lwr=uniroot(function(x)vcdf(x)-alpha/2,c(0,mode))$root
upr=uniroot(function(x)vcdf(x)-(1-alpha/2),c(mode,1))$root
c(lower=lwr,mean=mean,mode=mode,upper=upr)
}
mKoN2pCIq(100,4)
> mKoN2pCIq(100,4)
lower mean mode upper
0.1748351 0.3692810 0.3728936 0.5605172
> seq2pCI(100,4)
lower mean mode upper
0.1662099 0.3692810 0.3728936 0.5685943 > mKoN2pCI(100,4)
lower mean mode upper
0.1747676 0.3692810 0.3728936 0.5604309
> mKoN2pCIq(100,4)
lower mean mode upper
0.1748351 0.3692810 0.3728936 0.5605172
> mKoN2pCI(100,5)
lower mean mode upper
0.2445409 0.4469764 0.4589692 0.6418295
> mKoN2pCIq(100,5)
lower mean mode upper
0.2390957 0.4469764 0.4589692 0.6368895 底辺に行くのは、二浪三浪して仕方なく、なんだろうなやはり >>439
裏口入学確率ｐのときに100人中最大連続が4人になる確率をグラフにする。
これを標準化（グラフ下方の面積で割るだけ）して確率密度関数化して原点周りの一次モーメントで平均値を算出、
平均値周りの２次モーメントで分散を計算。
> (mean=integrate(function(x)x*pdf(x),0,1)$value)
[1] 0.369281
> (var=integrate(function(x)(x-mean)^2*pdf(x),0,1)$value)
[1] 0.009878284
から
> (sd=sqrt(var))
[1] 0.09938955
正規分布として下2.5％、上2.5%のとなるｐの値を求めると
> qnorm(0.025,mean,sd)
[1] 0.174481
> qnorm(0.975,mean,sd)
[1] 0.5640809
累積密度関数の逆関数を数値的に作って求めたHighest Densiti Intervalは
> pdf2hdi(pdf,Print=F)
lower upper
0.17477 0.56043
とほどんど同じになった。
最大４人連続で続いたときの裏口入学者の期待値は37人
95％信頼区間は17人から56人という結果が得られた。 >>449
最初から推薦でシリツ専願というのがあるらしいぞ。
国立卒には無縁なのでよく知らん。
そういえば底辺シリツにも地域枠ってあるらしいね。
額に地底と刺青してほしいねｗ ナマポも避けたがるのがド底辺シリツ医大卒
ナマポの症例報告です。
実例↓
517 卵の名無しさん 2018/02/25(日) 11:36:00.56 ID:gq76tAvs
福岡のあの歯科大かな？
歯科口腔外科で抜歯依頼したら爺ちゃんが〇〇歯科大卒の先生は避けて下さいねがあった
けど。
この爺ちゃん、聖マリ卒の先生もよけて下さいと初診時に言ってた札付き爺さん。
生保受給者のくせにね。 裏口入学が都市伝説だとか過去の話というのは
嘘だと全国民が知りつくしたのが東京医大の事件だね。
縁故や寄付金じゃなくて試験データの改竄。
シリツ＝裏口バカが確定。
まあ、当事者はずっと前に認識していたようだ。
ガチの裏と呼んでその存在を認めている。
http://imagizer.imageshack.com/img923/7955/w1bWeN.jpg
ガチの裏ｗｗｗｗｗｗｗ >>453
ここが重要ポイントな。
＞初診時に言ってた
実際に診察を受けなくても不利益を被ると看破されている聡明なナマポですなぁ。 あるド底辺シリツ医大の裏口入学者には背中に１から通し番号がふられている。
一学年の定員は１００人である。
裏口入学５人の番号のうち最大の番号が６０であった。
この学年の裏口入学者数の期待値を分数で答えよ。
お～い、ド底辺。
計算結果は5030556272103101/70368744177664 になったが、お前の母校で実験検証してくれ。
分数表示はともかく、この計算できない国立医学部卒がいたのにはびっくりした。
二項分布の足し算もできない学力でも臨床医がやれるんだよなぁ。
算数の掛け算すら怪しいのがシリツ医がこういう事故を起こすわけなんだな。
http://i.imgur.com/ArPaux9.png >>450
Cで書いてみたけど10万個のコイン投げまでは計算してくれたけど
100万個にすると暴走してしまった。
数字の宣言が実に面倒。小数を整数で冪乗しようとするとエラーが出てくるのでいちいちcastしなくちゃならん。
インタープリターに慣れちゃうとこの辺りがとても面倒に感じる。 /*
C:\pleiades\workspace>coin5 100000 15
Over 15 heads at 100000 flips : 0.782609
Just 15 heads at 100000 flips : 0.248904
*/
#include <stdio.h>
#include<stdlib.h>
#include<math.h>
#define p 0.5
double flip(long N,double k){
double P[N];
long i;
for(i = 0; i < k-1; i++) {
P[i] = 0;
}
P[(int)k-1] = pow(p,k);
P[(int)k] = pow(p,k) + (1-p)*pow(p,k);
for(i = (int)k; i < N; i++){
P[i+1] = P[i] + (1-P[i-(int)k])*pow(p,(double)(k+1));
}
return P[N];
}
int main(int argc,char *argv[]){
long N = atol(argv[1]);
double k = atof(argv[2]);
double PN =flip(N,k);
double PNJ = flip(N,k) - flip(N,k+1);
printf("Over %d heads at %d flips : %f\n", (int)k ,N ,PN);
printf("Just %d heads at %d flips : %f\n", (int)k ,N ,PNJ);
return 0;
} >>456
追加の設問を忘れてた。
この学年には何人の裏口入学者数の95%信頼区間を整数で述べよ。 >>459
>>456
日本語修正ｗ
この学年には何人の裏口入学者がいると推論されるか。
その人数の95%信頼区間を整数で述べよ。 >>458
doubleをlong doubleにしても100万コイントスは計算できなかった。
pythonでは時間がかかったけど、1億コイントスの確率を分数計算してくれた。 Last but not least, three laws of Do-Teihen(lowest-tier) Medical School, currently called Gachi'Ura by its graduates.
It is not the bottom medical school but its enrollee that is despicable, which deserves to be called a bona fide moron beyond redemption.
The graduates of Do-Teihen are so ashamed that none of them dare to mention their own alma mater they had gone through.
The Do-Teihen graduates are so ashamed of having bought their way into the exclusively lowest-tier medical school
that they tend to call a genuine doctor a charlatan who elucidates their imbecility. >>462
お～い、ド底辺。
計算結果は5030556272103101/70368744177664 になったが、お前の母校で実験検証してくれ。
あるド底辺シリツ医大の裏口入学者には背中に１から通し番号がふられている。
一学年の定員は１００人である。
裏口入学５人の番号のうち最大の番号が６０であった。
この学年の裏口入学者数の期待値を分数で答えよ。
この学年には何人の裏口入学者がいると推論されるか。
その人数の95%信頼区間を整数で述べよ。 （１）ド底辺シリツ裏口調査団が100人を順次調査した。
裏口判明人数をそのまま公表はヤバすぎる結果であったため、
連続して裏口がみつかった最大数は4人であったとだけ公表した。
（２）あるド底辺シリツ医大の裏口入学者には背中に１から通し番号がふられている。
一学年の定員は１００人である。
偶々みつかった裏口入学５人の番号のうち最大の番号が６０であった。
この二つの情報から、裏口人数の期待値と９５％信頼区間を求めてみよう。
離散量なので単に足し算すれば求まる。
vsJ=Vectorize(function(p) seqNpJ(N=100,K=4,p))
par(mfrow=c(2,2))
curve(vsJ,bty='l')
n=60:100
plot(n/100,vsJ(n/100),bty='l',type='h')
pmf=choose(60-1,5-1)/choose(n,5)
plot(n,pmf,bty='l',type='h')
plot(n,vsJ(pp)*pmf,type='h',bty='l')
pdf=vsJ(pp)*pmf/sum(vsJ(pp)*pmf)
> n[HDIofGrid(pdf)$`indices`]
[1] 60 61 62 63 64 65 66
（１）（2）を前提にすると裏口入学の学生数の95%信頼区間は６０～６６人と算出できた。 人数の期待値は
> sum(n*pdf)
[1] 61.87202 It is common knowledge among doctors and patients that Do-Teihen(exclusively bottom-leveled medical school) graduates mean morons who bought their way to Gachi'Ura(currently called by themselves)
According to the experience of entrance exam to medical school in the era of Showa, when the sense of discrimination against
privately-founded medical schools were more intense than it is now,
all such schools but for Keio had been so compared to some specialized institution for educable mentally retarded kids that nobody but imbecile successors of physicians in private practice had applied for admission.
There had been NOT a single classmate who chose willingly against his/her common sense to go to the Do-Teihen(exclusively bottom-leveled medical school, currently also known as Gachi'Ura),
which would have cost outrageous money and its graduates are destined to be called Uraguchi morons who bought thier way into the Do-Teihen, by thier colleagues and even by thier own clients.
Although people won't call them names to their face,
certain 80-90% people of about my age have been yet scorning and sneering at Uraguchi graduates, speaking in the back of our mind,
" Uraguchi morons shall not behave like somebody."
We never speak out face to face in real life. >>463
f <- function(Mmax,M=5,Nmax=100){
n=Mmax:Nmax
pmf=choose(Mmax-1,M-1)/choose(n,M)
pdf=pmf/sum (pmf)
mean=sum(n*pdf)
upr=n[which(cumsum(pdf)>0.95)[1]]
lwr=Mmax
c(lwr,mean,upr)
}
x=5:100
y=sapply(x,function(n) f(n)[2])
z=sapply(x,function(n) f(n)[3])
plot(x,y,type='l',lwd=2,bty='l')
segments(x,x,x,z,col='gray')
cbind(x,y,z) Last but not least, three laws of Do-Teihen(lowest-tier) Medical School, currently called Gachi'Ura by its graduates.
It is not the bottom medical school but its enrollee that is despicable, which deserves to be called a bona fide moron beyond redemption.
The graduates of Do-Teihen are so ashamed that none of them dare to mention their own alma mater they had gone through.
The Do-Teihen graduates are so ashamed of having bought their way into the exclusively lowest-tier medical school
that they tend to call a genuine doctor a charlatan who elucidates their imbecility. 本日、東京医科大学が記者会見を行い、2017年、2018年度の入試の際に不当に不合格と判定された101人に意向を確認した上で、追加合格者を認定することを発表しました。
101人の選考方法
2017年度と2018年度の入試において、繰り上げ合格とされた者よりも、上位の成績だったにもかかわらず不合格とされた受験生を調べたところ、2017年度は32人（男16人、女16人）、2018年度は69人（男18人、女53人）だったとのこと。
医学部の定員は120名
今回の問題とは全く関係なく、東京医科大学の医学部の1学年の定員は120名となっている。
https://www.savingdoctor.com/entry/2018/11/07/210330
すると２年間で101/240が裏口入学と認めたことになるのではないか？
問 ： １学年あたり裏口入学者数95%信頼区間を求めよ、また、99%信頼区間も求めよ。 >>468
ド底辺スレなのでちゃんと原文の日本語もつけろ。
Last but not least, three laws of Do-Teihen(lowest-tier) Medical School, currently called Gachi'Ura by its graduates.
最後にド底辺医大の三法則を掲げましょう。
1: It is not the bottom medical school but its enrollee that is despicable, which deserves to be called a bona fide moron beyond redemption.
ド底辺シリツ医大が悪いのではない、本人の頭が悪いんだ。
2: The graduates of Do-Teihen are so ashamed that none of them dare to mention their own alma mater they had gone through.
ド底辺シリツ医大卒は恥ずかしくて、学校名を皆さま言いません。
3: The Do-Teihen graduates are so ashamed of having bought their way into the exclusively lowest-tier medical school
that they tend to call a genuine doctor a charlatan who elucidates their imbecility.
ド底辺特殊シリツ医大卒は裏口入学の負い目から裏口馬鹿を暴く人間を偽医者扱いしたがる。 本日、東京医科大学が記者会見を行い、2017年、2018年度の入試の際に不当に不合格と判定された101人に意向を確認した上で、追加合格者を認定することを発表しました。
101人の選考方法
2017年度と2018年度の入試において、繰り上げ合格とされた者よりも、上位の成績だったにもかかわらず不合格とされた受験生を調べたところ、2017年度は32人（男16人、女16人）、2018年度は69人（男18人、女53人）だったとのこと。
医学部の定員は120名
今回の問題とは全く関係なく、東京医科大学の医学部の1学年の定員は120名となっている。
https://www.savingdoctor.com/entry/2018/11/07/210330
すると２年間で101/240が裏口入学と認めたことになるのではないか？
問 ： １学年あたり裏口入学者数95%信頼区間を求めよ、また、99%信頼区間も求めよ。
９９％信頼区間を計算すると、上限は５０％を超えちゃうね。
シリツ医大＝裏口 でいいよな？ ド底辺シリツ医大にある年の裏口受験票があることが判明した。
枚数は１０００枚以下であることは判明しているが、その数を推定したい。
裏口入学調査員が無作為に１０枚選んで番号を記録して元に戻した。
別の裏口入学調査員が無作為に２０枚選んで番号を記録した。
二人の調査員の記録した番号を照合すると３枚の番号が一致していた。
この情報からこの年の裏口受験証の数の最頻値、期待値とその９５％信頼区間を求めよ。 Last but not least, three laws of Do-Teihen(lowest-tier) Medical School, currently called Gachi'Ura by its graduates.
It is not the bottom medical school but its enrollee that is despicable, which deserves to be called a bona fide moron beyond redemption.
The graduates of Do-Teihen are so ashamed that none of them dare to mention their own alma mater they had gone through.
The Do-Teihen graduates are so ashamed of having bought their way into the exclusively lowest-tier medical school
that they tend to call a genuine doctor a charlatan who elucidates their imbecility. >>472
速攻で数学板で正解されてしまった。
信頼区間を求めよを追加すると、レスがつきにくいので外したのがよかったな。
rm(list=ls())
g=10 # b=N-g
s=20
x=3
Nmax=1000
N2p= function(N){
if(N < g + s - x) return(0)
b = N-g
dhyper(x,g,b,s) # choose(g,x)*choose(b,s-x)/choose(N,s)
}
pmf=Vectorize(N2p)
# HDI
source('hdi.R')
N=1:Nmax
y=pmf(N)
plot(N,y,bty='l',type='l',ylab='probability')
z=y/sum(y) # pdf 相当
plot(N,z,type='h',col='gray',ylab='density',bty='l')
sum(N*z)
min(HDIofGrid(z)[[1]]) ; max(HDIofGrid(z)[[1]])
# quantile
zc=cumsum(z)
min(which(zc>0.025)) ; min(which(zc>0.975)) シミュレーション結果と一致したので答には自信があったのだが、数学板でのレスと一致したので確信がもてた。
Rのスクリプトはこれ
Nmin=g+s-x
sub <- function(){
n=sample(Nmin:Nmax,1)
a=sample(n,g)
b=sample(n,s)
if(sum(a %in% b)==x) return(n)
}
sim <- function(){
r=sub()
while(is.null(r)) r=sub()
return(r)
}
re=replicate(1e5,sim())
summary(re) ; hist(re,freq=F,col="lightblue",main='',xlab='N') >>475
> summary(re) ; hist(re,freq=F,col="lightblue")
Min. 1st Qu. Median Mean 3rd Qu. Max.
28.00000 72.00000 107.00000 149.49666 174.00000 1000.00000
> MODE <- function(x) {
+ dens <- density(x)
+ mode_i <- which.max(dens$y) # densityの頂点となるindex
+ mode_x <- dens$x[mode_i]
+ mode_y <- dens$y[mode_i]
+ mode_x
+ }
> MODE(re)
[1] 68.90811110786575 東京医大、本来合格者入学許可へ 今年の受験生５０人
2018年10月25日 02時06分
東京医科大＝８月、東京都新宿区
東京医科大が今年の入試で本来合格ラインを上回っていたのに、不正の影響で不合格となった受験生５０人に対し、来年４月の入学を認める方針を固めたことが２４日、関係者への取材で分かった。
昨年の本来合格者１９人については、難しいとの意見が出ているもようだ。東京医大は５０人のうち入学希望が多数に上った場合は、来年の一般入試の募集人員減も検討。
https://www.nishinippon.co.jp/sp/nnp/national/article/460101/
本日、東京医科大学が記者会見を行い、2017年、2018年度の入試の際に不当に不合格と判定された101人に意向を確認した上で、追加合格者を認定することを発表しました。
101人の選考方法
2017年度と2018年度の入試において、繰り上げ合格とされた者よりも、上位の成績だったにもかかわらず不合格とされた受験生を調べたところ、2017年度は32人（男16人、女16人）、2018年度は69人（男18人、女53人）だったとのこと。
https://www.savingdoctor.com/entry/2018/11/07/210330
１９人５０人と言ってたのが、３２人６９人に増えてんじゃん。 >>477
どっちにしてもそんなの氷山の一角
過去からの累積入学者なんて膨大な人数なんじゃねえの？
と言うか、元々高額な授業料を払えない受験生を排除した入学試験を
実施している時点で裏口みたいなものだから、元々大学側はそういうこと
に対しては鈍感というか、あまり気にしてなかったんじゃねえの？
国が大学の補助金が云々言い出したので慌てふためいているだけで。 >>478
ド底辺シリツ医大卒の裏口バカの言い分をご覧ください。
東京医大の事件で点数加算の不正まで発覚しているのに、
>裏？
>そんなのあるかよばか
だそうです。
http://imagizer.imageshack.com/img924/4761/OuxS6x.jpg >>478
元は文科省の汚職なのだが、いつの間にやら男女比がどうやらこうやら。
まあ、裏口入学学生を除籍処分にしないのだから、
シリツ＝裏口バカの公式は健在だよな。 It is common knowledge among doctors and patients that Do-Teihen(exclusively bottom-leveled medical school) graduates mean morons who bought their way to Gachi'Ura(currently called by themselves)
According to the experience of entrance exam to medical school in the era of Showa, when the sense of discrimination against
privately-founded medical schools were more intense than it is now,
all such schools but for Keio had been so compared to some specialized institution for educable mentally retarded kids that nobody but imbecile successors of physicians in private practice had applied for admission.
There had been NOT a single classmate who chose willingly against his/her common sense to go to the Do-Teihen(exclusively bottom-leveled medical school, currently also known as Gachi'Ura),
which would have cost outrageous money and its graduates are destined to be called Uraguchi morons who bought thier way into the Do-Teihen, by thier colleagues and even by thier own clients.
Although people won't call them names to their face,
certain 80-90% people of about my age have been yet scorning and sneering at Uraguchi graduates, speaking in the back of our mind,
" Uraguchi morons shall not behave like somebody."
We never speak out face to face in real life. ニュー速＋のこれが正義だと思う。
251 名無しさん＠１周年 2018/11/09(金) 03:01:30.51 ID:T61ryGbd0
不正合格者退学にして空けろよ
252 名無しさん＠１周年 2018/11/09(金) 03:27:59.34 ID:Wfw1oWQ60
裏口で入ったのをやめさせろよ。 >>478
縁故や「寄付金」での加点も裏口と呼ぶならば裏口でない学生の方が少ないかもね。 >>481
単発idのこいつもド底辺シリツに裏口入学なんだろうなぁ。
ちゃんと原文もつけろよ。
現在も通用する、不朽の名投稿
(quote)
私は昭和の時代に大学受験したけど、昔は今よりも差別感が凄く、慶応以外の私立医は特殊民のための特殊学校というイメージで開業医のバカ息子以外は誰も受験しようとすらしなかった。
常識的に考えて、数千万という法外な金を払って、しかも同業者からも患者からもバカだの裏口だのと散々罵られるのをわかって好き好んで私立医に行く同級生は一人もいませんでした。
本人には面と向かっては言わないけれど、俺くらいの年代の人間は、おそらくは８－９割は私立卒を今でも「何偉そうなこと抜かしてるんだ、この裏口バカが」と心の底で軽蔑し、嘲笑しているよ。
当の本人には面と向かっては絶対にそんなことは言わないけどね。
(unquote) コピペだがこれに納得。
私立大学では、誰を入学させるかは大学の自由などと言ってる人
「大学設置基準」（学校教育法に基づく文部科学省令）の明確な違反（法令違反）だ。
2条の2 入学者の選抜は、公正かつ妥当な方法により、適切な体制を整えて行うものとする。
ちなみに、これに基づく入試の公正確保のための事務次官通達もでている。
また、学校法人は、私立学校法により、公の認可を受けた公益法人。税制面の優遇も受けている。
営利企業とは全く異なる存在。さらに、東京医大を例にとれば、平成28年で20億以上の補助金が配布されている。
一人当たり年間300～400万円、6年で2000万円前後の税金が使われている。
こうした前提を無視し、適当な言説をばらまくのは控えるべき。
（参考資料）
私立大学における入学者選抜の公正確保等について
http://www.mext.go.jp/b_menu/hakusho/nc/t20021001001/t20021001001.html ＡＢＣ
ＡＣＢ
ＢＡＣ
ＢＣＡ
＋ＣＡＢ
--------
３１２３
Ａ，Ｂ，Ｃは？
Haskell
[(a,b,c)|a<-[1..9],b<-[1..9],c<-[1..9], (a+a+b+b+c)*100+(b+c+a+c+a)*10+(c+b+c+a+b)==3123]
Python
n = range(1,10)
for A in n:
for B in n:
for C in n:
if (A+A+B+B+C)*100+(B+C+A+C+A)*10+(C+B+C+A+B)==3123:
print( [A,B,C] )
R
n=1:9
N=c(100,10,1)
for(A in n){
for(B in n){
for(C in n){
S=sum(c(A,B,C)*N+c(A,C,B)*N+c(B,A,C)*N+c(B,C,A)*N+c(C,A,B)*N)
if(S==3123) ans=c(A,B,C)
}
}
}
ans C
#include <stdio.h>
int A,B,C,i;
int main() {
for(A=1;A<10;A++){
for(B=1;B<10;B++){
for(C=1;C<10;C++){
i=(A+A+B+B+C)*100+(B+C+A+C+A)*10+(C+B+C+A+B);
if(i==3123) printf("%d %d %d\n",A,B,C);
}
}
}
} Last but not least, three laws of Do-Teihen(lowest-tier) Medical School, currently called Gachi'Ura by its graduates.
It is not the bottom medical school but its enrollee that is despicable, which deserves to be called a bona fide moron beyond redemption.
The graduates of Do-Teihen are so ashamed that none of them dare to mention their own alma mater they had gone through.
The Do-Teihen graduates are so ashamed of having bought their way into the exclusively lowest-tier medical school
that they tend to call a genuine doctor a charlatan who elucidates their imbecility. でも私立医大卒の医者って良いよな～。
だって親がお金持ちじゃなかったら本当は
医者じゃなかったかもしれない連中なんだぜｗ [(a,b,c,d,e,f,g)|a<-[1..9],b<-[1..9],c<-[1..9],d<-[1..9],e<-[1..9],f<-[1..9],g<-[1..9],a/b*c/d=(10*e+b)/g] 1問目は1から9を多くて1回づつ使って等式を完成させる
https://i.imgur.com/os8xCr9.jpg
□/□ ＊ □/□ ＝ □□/□
(a/b)*(c/d) = (10*e+f) /g
左辺の分数は互換なのでa>cとして
Prelude> map f r
[[7,2,3,6,1,4,8],[7,6,3,2,1,4,8],[8,2,3,6,1,4,7],[8,2,7,4,6,3,9],[8,2,7,6,1,4,3],[8,4,7,2,6,3,9],[8,4,7,6,2,1,9],[8,6,3,2,1,4,7],[9,2,7,4,6,3,8],
[9,2,8,4,6,3,7],[9,4,7,2,6,3,8],[9,4,7,6,2,1,8],[9,4,8,2,6,3,7],[9,4,8,6,2,1,7],[9,6,7,4,2,1,8],[9,6,8,4,2,1,7]]
お～い、ド底辺、他に答がないか検算しておけ。 >>491
Rでのスパテゲティーコード
実用的な時間で算出できるかなぁ？
# □/□ ＊ □/□ ＝ □□/□
# a/b * c/d == ef/g (c>a)
F=function(a,b,c,d,e,f,g){
a!=b & a!=c & a!=d & a!=e & a!=f & a!=g &
b!=c & b!=d & b!=e & b!=f & b!=g & c!=d &
c!=e & c!=f & c!=g & d!=e & d!=f & d!=g & e!=f & e!=g & f!=g & (a/b)*(c/d)==(10*e+f)/g
}
n=1:9
ans=NULL
for(a in n){
for(b in n){
for(c in a:9){
for(d in n){
for(e in n){
for(f in n){
for(g in n){
if(F(a,b,c,d,e,f,g)){
ans=rbind(ans,c(a,b,c,d,e,f,g))}}}}}}}}
ans 分母に１を許さないことにすると
> ans
[,1] [,2] [,3] [,4] [,5] [,6] [,7]
[1,] 3 2 7 6 1 4 8
[2,] 3 2 8 6 1 4 7
[3,] 3 6 7 2 1 4 8
[4,] 3 6 8 2 1 4 7
[5,] 7 2 8 4 6 3 9
[6,] 7 2 9 4 6 3 8
[7,] 7 4 8 2 6 3 9
[8,] 7 4 9 2 6 3 8
[9,] 7 4 9 6 2 1 8
[10,] 7 6 8 2 1 4 3
[11,] 7 6 8 4 2 1 9
[12,] 7 6 9 4 2 1 8
[13,] 8 2 9 4 6 3 7
[14,] 8 4 9 2 6 3 7
[15,] 8 4 9 6 2 1 7
[16,] 8 6 9 4 2 1 7 分母に整数を許すと３４個あるな。（左辺の分数は区別しない） >>494
-- □/□ ＊ □/□ ＝ □□/□
r0 = [[a,b,c,d,e,f,g]|a<-[1..9],b<-[2..9],c<-[(a+1)..9],d<-[2..9],e<-[1..9],f<-[1..9],g<-[2..9],(a/b)*(c/d)==(10*e+f)/g,a/=b,a/=c,a/=d,a/=e,a/=f,a/=g,b/=c,b/=d,b/=e,b/=f,b/=g,c/=d,c/=e,c/=f,c/=g,d/=e,d/=f,d/=g,e/=f,e/=g,f/=g]
r1 = [[a,b,c,d,e,f,g]|a<-[1..9],b<-[1..9],c<-[(a+1)..9],d<-[1..9],e<-[1..9],f<-[1..9],g<-[2..9],(a/b)*(c/d)==(10*e+f)/g,a/=b,a/=c,a/=d,a/=e,a/=f,a/=g,b/=c,b/=d,b/=e,b/=f,b/=g,c/=d,c/=e,c/=f,c/=g,d/=e,d/=f,d/=g,e/=f,e/=g,f/=g]
f x = map floor x
ans0 = map f r0
ans1 = map f r1
f0 = do
putStrLn "One is NOT permitted as denominator"
putStrLn $ show(length(ans0)) ++ " combinations"
print ans0
f1 = do
putStrLn "permissive of 1 as denominator"
putStrLn $ show(length(ans1)) ++ " combinations"
print ans0
main = do
f0
f1 -- □/□ ＊ □/□ ＝ □□/□
r0 = [[a,b,c,d,e,f,g]|a<-[1..9],b<-[2..9],c<-[(a+1)..9],d<-[2..9],e<-[1..9],f<-[1..9],g<-[2..9],(a/b)*(c/d)==(10*e+f)/g,
a/=b,a/=c,a/=d,a/=e,a/=f,a/=g,b/=c,b/=d,b/=e,b/=f,b/=g,c/=d,c/=e,c/=f,c/=g,d/=e,d/=f,d/=g,e/=f,e/=g,f/=g]
r1 = [[a,b,c,d,e,f,g]|a<-[1..9],b<-[1..9],c<-[(a+1)..9],d<-[1..9],e<-[1..9],f<-[1..9],g<-[2..9],(a/b)*(c/d)==(10*e+f)/g,
a/=b,a/=c,a/=d,a/=e,a/=f,a/=g,b/=c,b/=d,b/=e,b/=f,b/=g,c/=d,c/=e,c/=f,c/=g,d/=e,d/=f,d/=g,e/=f,e/=g,f/=g]
f x = map floor x
ans0 = map f r0
ans1 = map f r1
f0 = do
putStrLn "One is NOT permitted as denominator"
putStrLn $ show(length(ans0)) ++ " combinations"
print ans0
f1 = do
putStrLn "permissive of 1 as denominator"
putStrLn $ show(length(ans1)) ++ " combinations"
print ans1
main = do
f0
f1
Prelude> :main
One is NOT permitted as denominator
16 combinations
[[3,2,7,6,1,4,8],[3,2,8,6,1,4,7],[3,6,7,2,1,4,8],[3,6,8,2,1,4,7],[7,2,8,4,6,3,9],[7,2,9,4,6,3,8],[7,4,8,2,6,3,9],[7,4,9,2,6,3,8],[7,4,9,6,2,1,8],[7,6,8,2,1,4,3],
[7,6,8,4,2,1,9],[7,6,9,4,2,1,8],[8,2,9,4,6,3,7],[8,4,9,2,6,3,7],[8,4,9,6,2,1,7],[8,6,9,4,2,1,7]]
permissive of 1 as denominator
34 combinations
[[2,1,8,4,3,6,9],[2,1,9,4,3,6,8],[2,4,8,1,3,6,9],[2,4,9,1,3,6,8],[3,2,7,6,1,4,8],[3,2,8,6,1,4,7],[3,6,7,2,1,4,8],[3,6,8,2,1,4,7],[4,1,6,3,7,2,9],[4,1,6,8,2,7,9]
,[4,1,9,3,7,2,6],[4,1,9,8,2,7,6],[4,3,6,1,7,2,9],[4,3,9,1,7,2,6],[4,8,6,1,2,7,9],[4,8,9,1,2,7,6],
[6,1,9,3,7,2,4],[6,1,9,8,2,7,4],[6,3,9,1,7,2,4],[6,8,9,1,2,7,4],[7,2,8,4,6,3,9],[7,2,9,4,6,3,8],[7,4,8,2,6,3,9],[7,4,9,2,6,3,8],[7,4,9,6,2,1,8],[7,6,8,2,1,4,3]
,[7,6,8,4,2,1,9],[7,6,9,4,2,1,8],[8,1,9,4,3,6,2],[8,2,9,4,6,3,7],[8,4,9,1,3,6,2],[8,4,9,2,6,3,7],
[8,4,9,6,2,1,7],[8,6,9,4,2,1,7]] It is common knowledge among doctors and patients that Do-Teihen(exclusively bottom-leveled medical school) graduates mean morons who bought their way to Gachi'Ura(currently called by themselves)
According to the experience of entrance exam to medical school in the era of Showa, when the sense of discrimination against
privately-founded medical schools were more intense than it is now,
all such schools but for Keio had been so compared to some specialized institution for educable mentally retarded kids that nobody but imbecile successors of physicians in private practice had applied for admission.
There had been NOT a single classmate who chose willingly against his/her common sense to go to the Do-Teihen(exclusively bottom-leveled medical school, currently also known as Gachi'Ura),
which would have cost outrageous money and its graduates are destined to be called Uraguchi morons who bought thier way into the Do-Teihen, by thier colleagues and even by thier own clients.
Although people won't call them names to their face,
certain 80-90% people of about my age have been yet scorning and sneering at Uraguchi graduates, speaking in the back of our mind,
" Uraguchi morons shall not behave like somebody."
We never speak out face to face in real life. >>495
ここでHaskell実行可能
俺の環境よりon line の方が高速ｗ
http://tpcg.io/dbtTnK Uryuu fell 23 times in the national exam
It is an amateur virgin who is also failing in marriage
To the Uraguchi of the spinning parpurin
He is getting turned on
F class clerks condenced raw kid juice
The smell of the Doteihen does not decrease
NnnnnHooOoooOoooooooo 私立底辺医の医者はどう生きていけばいい？
誰か教えて >>500
裏口入学の５０人を除籍処分にしないかぎり、信頼の回復はないね。つまり、いつまで経ってもシリツ医大卒＝裏口バカと汚名は拭えない。シリツ出身者こそ、裏口入学に厳しい処分せよを訴えるべき。
裏口入学医師の免許剥奪を！の国民運動の先頭に立てばよいぞ。
僕も裏口入学とか、言ってたら信頼の回復はない。 >>501
いまや認めただけで101人かよ。
本日、東京医科大学が記者会見を行い、2017年、2018年度の入試の際に不当に不合格と判定された101人に意向を確認した上で、追加合格者を認定することを発表しました。
101人の選考方法
2017年度と2018年度の入試において、繰り上げ合格とされた者よりも、上位の成績だったにもかかわらず不合格とされた受験生を調べたところ、2017年度は32人（男16人、女16人）、2018年度は69人（男18人、女53人）だったとのこと。
https://www.savingdoctor.com/entry/2018/11/07/210330 ニュー速＋のこれが正義だと思う。
251 名無しさん＠１周年 2018/11/09(金) 03:01:30.51 ID:T61ryGbd0
不正合格者退学にして空けろよ
252 名無しさん＠１周年 2018/11/09(金) 03:27:59.34 ID:Wfw1oWQ60
裏口で入ったのをやめさせろよ。 数学スレにこんな問題
分からない問題はここに書いてね448
https://rio2016.5ch.net/test/read.cgi/math/1540218853/789
789 名前：１３２人目の素数さん[] 投稿日：2018/11/17(土) 01:54:23.54 ID:SOe/0VMF
情報理論の問題です。（１）は解けるのですが、（２）でつまずいています...
＜問題＞
50人の生徒からなるクラスがある。
そのうち30人は男子、20人は女子であり、男子のうち18人、女子のうち2人は眼鏡をかけている仮定とする。
（１）男女の別、眼鏡の有無のそれぞれが持つ平均自己相互量を求めよ。
（２）男女の性別が判っているという条件のもとで、眼鏡の有無が持つ条件付き自己情報量を求めよ。
答えは、
（１）H(X) = 0.97ビット, H(Y) = 0.97ビット
（２）H(Y|X) = 0.77ビット
となっております。
得意な方がいましたら、（２）の答えを出すまでの計算過程を教えていただきたいです。
よろしくお願い致します。
問題の意味すら分からないのだが、答が出ているのに計算過程がわからないと実に気持ち悪い。 ネットで検索して情報量の意味が理解できたのでRでスクリプトを組んで算出してみた。
> ent <- function(x){ # 情報エントロピー（平均情報量）
+ x=x/sum(x)
+ entropy=0
+ for(i in x) entropy=entropy+i*(-log2(i))
+ return(entropy)
+ }
> 30/50*ent(c(18/30,12/30)) + 20/50*ent(c(2/20,18/20))
[1] 0.7701686
呆け予防には役立ったなぁ。
まあ、ド底辺に関してはこれだからな。
We hold these truths to be self-evident, that all "uraguchi" are created retards,
That they are endowed by their creator with certain unalienable traits, that among these are sloth, mythomania, and the pursuit of imbecility. >>505
当然、
(3) 眼鏡の有無が判っているという条件のもとで、男女の性別が持つ条件付き自己情報量を求めよ。
という問題を自己作成して解きたくなる。
> (18+2)/50*ent(c(18/(18+2),2/(18+2))) + (50-18-2)/50*ent(c((30-18)/(50-18-2),18/(50-18-2)))
[1] 0.7701686
で(2)の結果と同じになる。
これを検証できる頭脳はド底辺医大卒の裏口バカにはいないだろうなぁ。 ent x = do
let y = map(/sum(x)) x
z = map (\i -> -i*(logBase 2 i)) y
in print $ sum z >>505
Haskellだと2行で済むなぁ。
Prelude> let entropy x = sum $ map (\i -> -i*(logBase 2 i)) ( map(/sum(x)) x )
Prelude> 30/50 * entropy [18, 12] + 20/50 * entropy [2, 18]
0.7701685941085136 {-
＜問題＞
120(n)人の生徒からなるクラスがある。
そのうち90(m)人は男子、30(f)人は女子であり、男子のうち80(um)人、女子のうち10(uf)人は裏口入学であると仮定とする。
（１）男女の別、裏口の有無のそれぞれが持つ平均自己相互量をビット値で求めよ。
（２）男女の性別が判っているという条件のもとで、裏口の有無が持つ条件付き自己情報量（ビット値）を求めよ。
-}
entropy x = sum $ map (\i -> -i*(logBase 2 i)) ( map(/sum(x)) x )
entr_ura_gender n m f um uf = do
m/n*entropy[um,m-um] + f/n*entropy[uf,f-uf] It is common knowledge among doctors and patients that Do-Teihen(exclusively bottom-leveled medical school) graduates mean morons who bought their way to Gachi'Ura(currently called by themselves)
According to the experience of entrance exam to medical school in the era of Showa, when the sense of discrimination against
privately-founded medical schools were more intense than it is now,
all such schools but for Keio had been so compared to some specialized institution for educable mentally retarded kids that nobody but imbecile successors of physicians in private practice had applied for admission.
There had been NOT a single classmate who chose willingly against his/her common sense to go to the Do-Teihen(exclusively bottom-leveled medical school, currently also known as Gachi'Ura),
which would have cost outrageous money and its graduates are destined to be called Uraguchi morons who bought thier way into the Do-Teihen, by thier colleagues and even by thier own clients.
Although people won't call them names to their face,
certain 80-90% people of about my age have been yet scorning and sneering at Uraguchi graduates, speaking in the back of our mind,
" Uraguchi morons shall not behave like somebody."
We never speak out face to face in real life. It is common knowledge among doctors and patients that Do-Teihen(exclusively bottom-leveled medical school) graduates mean morons who bought their way to Gachi'Ura(currently called by themselves)
According to the experience of entrance exam to medical school in the era of Showa, when the sense of discrimination against
privately-founded medical schools were more intense than it is now,
all such schools but for Keio had been so compared to some specialized institution for educable mentally retarded kids that nobody but imbecile successors of physicians in private practice had applied for admission.
There had been NOT a single classmate who chose willingly against his/her common sense to go to the Do-Teihen(exclusively bottom-leveled medical school, currently also known as Gachi'Ura),
which would have cost outrageous money and its graduates are destined to be called Uraguchi morons who bought thier way into the Do-Teihen, by thier colleagues and even by thier own clients.
Although people won't call them names to their face,
certain 80-90% people of about my age have been yet scorning and sneering at Uraguchi graduates, speaking in the back of our mind,
" Uraguchi morons shall not behave like somebody."
We never speak out face to face in real life. つまらんスレやな
至極当然のことを何の捻りもないタイトルでそのままのっけてやがる >>512
そうなんだよね。
ド底辺シリツ医大卒が国立卒並みの頭脳を発揮すればびっくりするんだけどね。
こういうのに答えられる椰子はいないね。
ド底辺シリツ医に代わって答えてもいいぞ。
池の鯉を網で５６匹すくいました。
すくった５６匹に目印をつけ、池にもどしました。
次の日に鯉４５匹をすくったところ、３６匹に目印がついていました。
(1)池の鯉の総数の最尤値を述べよ（２つある）。
(2)最尤値が２つあるのは何匹の目印鯉が捕獲されたときか述べよ。 >>511
原文はこれだけど英訳を推敲できる椰子はいないのか？
私は昭和の時代に大学受験したけど、昔は今よりも差別感が凄く、特殊民のための特殊学校というイメージで開業医のバカ息子以外は誰も受験しようとすらしなかった。
常識的に考えて、数千万という法外な金を払って、しかも同業者からも患者からもバカだの裏口だのと散々罵られるのをわかって好き好んでド底辺医に行く同級生は一人もいませんでした。
本人には面と向かっては言わないけれど、俺くらいの年代の人間は、おそらくは８－９割はド底辺医卒を今でも「何偉そうなこと抜かしてるんだ、この裏口バカが」と心の底で軽蔑し、嘲笑しているよ。
当の本人には面と向かっては絶対にそんなことは言わないけどね。 i tried it in Showa u motherfucker. in that time niggers were supposed be in what niggahz were supposed to be motherfucking in, which we call a discrimination.
they pay shit loaded money to motherfucking niggers ass-bitch cocksucker fucking gringo homosexual hobo
i mean fuck you all go down hell R
> rep (7,3)
[1] 7 7 7
Haskell
Prelude> let rep x n = if n<=0 then [] else x : rep x (n-1)
Prelude> rep 7 3
[7,7,7] > (1:9)[1:3]
[1] 1 2 3
Prelude> take 3 [1..9]
[1,2,3] >>489
普通は教育投資すればある程度の学力は身につく。
シリツ医大の高額学費が払える経済環境で教育投資したはず。
それでもド底辺シリツ医大にしか入れないのはそういうことだｗ． 昔からある 「油わけ算」、 古くは塵劫記にも載っている問題です。
現代風にアレンジしますと、
１０リットルの油が入っていて、 ７リットル入る容器と、 ３リットル入る容器だけを使って ５リットルずつに分ける方法は？
http://funahashi.kids.coocan.jp/suugaku/suu43.html
理系の大学を出ているなら、これくらい算出できる学力はほしいね。
１０００リットルの油が入っていて、 ５０１リットル入る容器と、 ４９９リットル入る容器だけを使って ５００リットルずつに分ける方法は？ １００リットルの油が入っていて、 ５１リットル入る容器と、 ４９リットル入る容器だけを使って ７０リットルと３０５００リットルに分ける方法は
> abura(Amax=100,Bmax=51,Cmax=49,100,0,0,70,30,0)
100 51 49
[1,] 100 0 0
[2,] 49 51 0
[3,] 49 2 49
[4,] 98 2 0
[5,] 98 0 2
[6,] 47 51 2
[7,] 47 4 49
[8,] 96 4 0
[9,] 96 0 4
[10,] 45 51 4
[11,] 45 6 49
[12,] 94 6 0
[13,] 94 0 6
[14,] 43 51 6
[15,] 43 8 49
[16,] 92 8 0
[17,] 92 0 8
[18,] 41 51 8
[19,] 41 10 49
[20,] 90 10 0
[21,] 90 0 10
[22,] 39 51 10
[23,] 39 12 49
[24,] 88 12 0
[25,] 88 0 12
[26,] 37 51 12
[27,] 37 14 49 [28,] 86 14 0
[29,] 86 0 14
[30,] 35 51 14
[31,] 35 16 49
[32,] 84 16 0
[33,] 84 0 16
[34,] 33 51 16
[35,] 33 18 49
[36,] 82 18 0
[37,] 82 0 18
[38,] 31 51 18
[39,] 31 20 49
[40,] 80 20 0
[41,] 80 0 20
[42,] 29 51 20
[43,] 29 22 49
[44,] 78 22 0
[45,] 78 0 22
[46,] 27 51 22
[47,] 27 24 49
[48,] 76 24 0
[49,] 76 0 24
[50,] 25 51 24
[ [51,] 25 26 49
[52,] 74 26 0
[53,] 74 0 26
[54,] 23 51 26
[55,] 23 28 49
[56,] 72 28 0
[57,] 72 0 28
[58,] 21 51 28
[59,] 21 30 49
[60,] 70 30 0
お～い、ド底辺
これより短いステップで可能かどうか検証してくれ。 Last but not least, three laws of Do-Teihen(lowest-tier) Medical School, currently called Gachi'Ura by its graduates.
It is not the bottom medical school but its enrollee that is despicable, which deserves to be called a bona fide moron beyond redemption.
The graduates of Do-Teihen are so ashamed that none of them dare to mention their own alma mater they had gone through.
The Do-Teihen graduates are so ashamed of having bought their way into the exclusively lowest-tier medical school
that they tend to call a genuine doctor a charlatan who elucidates their imbecility. >>520
70リットルと30リットルに分ける問題。 It is common knowledge among doctors and patients that Do-Teihen(exclusively bottom-leveled medical school) graduates mean morons who bought their way to Gachi'Ura(currently called by themselves)
According to the experience of entrance exam to medical school in the era of Showa, when the sense of discrimination against
privately-founded medical schools were more intense than it is now,
all such schools but for Keio had been so compared to some specialized institution for educable mentally retarded kids that nobody but imbecile successors of physicians in private practice had applied for admission.
There had been NOT a single classmate who chose willingly against his/her common sense to go to the Do-Teihen(exclusively bottom-leveled medical school, currently also known as Gachi'Ura),
which would have cost outrageous money and its graduates are destined to be called Uraguchi morons who bought thier way into the Do-Teihen, by thier colleagues and even by thier own clients.
Although people won't call them names to their face,
certain 80-90% people of about my age have been yet scorning and sneering at Uraguchi graduates, speaking in the back of our mind,
" Uraguchi morons shall not behave like somebody."
We never speak out face to face in real life. It is common knowledge among doctors and patients that Do-Teihen(exclusively bottom-leveled medical school) graduates mean morons who bought their way to Gachi'Ura(currently called by themselves)
According to the experience of entrance exam to medical school in the era of Showa, when the sense of discrimination against
privately-founded medical schools were more intense than it is now,
all such schools but for Keio had been so compared to some specialized institution for educable mentally retarded kids that nobody but imbecile successors of physicians in private practice had applied for admission.
There had been NOT a single classmate who chose willingly against his/her common sense to go to the Do-Teihen(exclusively bottom-leveled medical school, currently also known as Gachi'Ura),
which would have cost outrageous money and its graduates are destined to be called Uraguchi morons who bought thier way into the Do-Teihen, by thier colleagues and even by thier own clients.
Although people won't call them names to their face,
certain 80-90% people of about my age have been yet scorning and sneering at Uraguchi graduates, speaking in the back of our mind,
" Uraguchi morons shall not behave like somebody."
We never speak out face to face in real life. 【裁判】「娘が落第…寄付金3000万円返して」父親が岩手医大を提訴、大学側は「返還義務はない」として争う姿勢…盛岡地裁
https://asahi.5ch.net/test/read.cgi/newsplus/1542856472/1
1 名前：かばほ～るφ ★ [sageteoff] 投稿日：2018/11/22(木) 12:14:32.38 ID:CAP_USER9
「娘落第…寄付金3000万円返して」父が岩手医大を提訴 大学側は争う姿勢
岩手医大に十分な寄付をしたのに次女が落第したとして、
北海道苫小牧市の父親が大学に寄付金計３０００万円の返還を求める訴訟を
盛岡地裁に起こして２１日、第１回口頭弁論が開かれた。
大学側は全面的に争う姿勢を示し、請求棄却を求めた。
訴えによると、次女は５年生だった２０１４年度末の進級試験で落第。
大学から「成績が悪かったのではなく、寄付金の振り込みが遅れたからだ」
と指摘を受けて１５年３月末、大学に１０００万円を送金した。
しかし進級は認められず１５年１１月、
それまでに寄付した全額を返還することで医学部長らと合意したという。
父親の代理人弁護士によると、次女が１０年４月に入学する際、
大学は６年間に計３０００万円以上を寄付するよう求める文書を送付。
父親は１１年１１月までに２０００万円を寄付していた。
岩手医大の代理人弁護士は河北新報社の取材に
「寄付金は受け取っているが返還には合意しておらず、返還義務もない。
全面的に争う」と話した。
河北新報 2018年11月22日木曜日
https://www.kahoku.co.jp/tohokunews/201811/20181122_33037.html 「成績が悪かったのではなく、寄付金の振り込みが遅れたからだ」
こういうのを信じる椰子が、シリツ医大を選択するわけだなぁ。 大麻解禁は、世界の潮流です。
なぜ、世界中で大麻が解禁されているのか？
それは、あらゆる難病に効果を発揮する事が分かって来たからです。
しかも、どこでも育つ丈夫な植物ですから、安価に賄えるのです。
日本でも早急に大麻を解禁しましょう！
https://forbesjapan.com/articles/detail/24029 Prudence, indeed, will dictate that "uraguchi" long established cannot be changed for light and transient causes;
and accordingly all experience has shown, that BMS are more disposed to suffer, while evils are sufferable, than to right themselves by abolishing the forms from which they can pursue profit.
But when a long train of misbehavior and misconduct , showing invariably the same Imbecility evinces a design to reveal themselves as absolute Bona Fide Moron ,
it is their right, it is their duty, to expel such "uraguchi", and to provide new guards for their future security. 私立底辺医に入ったけど医者にならない方がいいんかな 私立底辺医に入ったけど医者にならない方がいいんかな >>531
ド底辺シリツ医大にしか入れない頭脳で知的職業は無理。 大麻解禁は、世界の潮流です。
なぜ、世界中で大麻が解禁されているのか？
それは、あらゆる難病に効果を発揮する事が分かって来たからです。
しかも、どこでも育つ丈夫な植物ですから、安価に賄えるのです。
日本でも早急に大麻を解禁しましょう！
https://forbesjapan.com/articles/detail/24029 # ある医院に１時間あたり平均５人の患者が来院し、その人数の分布はポアソン分布にしたがうとする。
# 1時間あたりの平均診療人数は６人（平均診療時間１０分）で、一人あたりの診療時間は指数分布に従うとする。
# 診察までの平均の待ち時間は何分か？ It is common knowledge among doctors and patients that Do-Teihen(exclusively bottom-leveled medical school) graduates mean morons who bought their way to Gachi'Ura(currently called by themselves)
According to the experience of entrance exam to medical school in the era of Showa, when the sense of discrimination against
privately-founded medical schools were more intense than it is now,
all such schools but for Keio had been so compared to some specialized institution for educable mentally retarded kids that nobody but imbecile successors of physicians in private practice had applied for admission.
There had been NOT a single classmate who chose willingly against his/her common sense to go to the Do-Teihen(exclusively bottom-leveled medical school, currently also known as Gachi'Ura),
which would have cost outrageous money and its graduates are destined to be called Uraguchi morons who bought thier way into the Do-Teihen, by thier colleagues and even by thier own clients.
Although people won't call them names to their face,
certain 80-90% people of about my age have been yet scorning and sneering at Uraguchi graduates, speaking in the back of our mind,
" Uraguchi morons shall not behave like somebody."
We never speak out face to face in real life. Last but not least, three laws of Do-Teihen(lowest-tier) Medical School, currently called Gachi'Ura by its graduates.
It is not the bottom medical school but its enrollee that is despicable, which deserves to be called a bona fide moron beyond redemption.
The graduates of Do-Teihen are so ashamed that none of them dare to mention their own alma mater they had gone through.
The Do-Teihen graduates are so ashamed of having bought their way into the exclusively lowest-tier medical school
that they tend to call a genuine doctor a charlatan who elucidates their imbecility. Prudence, indeed, will dictate that "uraguchi" long established cannot be changed for light and transient causes;
and accordingly all experience has shown, that BMS are more disposed to suffer, while evils are sufferable, than to right themselves by abolishing the forms from which they can pursue profit.
But when a long train of misbehavior and misconduct , showing invariably the same Imbecility evinces a design to reveal themselves as absolute Bona Fide Moron ,
it is their right, it is their duty, to expel such "uraguchi", and to provide new guards for their future security. >>538
この投稿がまさにこれ！
ド底辺bona fide moron!
a long train of misbehavior and misconduct , showing invariably the same Imbecility evinces a design to reveal themselves as absolute Bona Fide Moron バスの時刻表から平均待ち時間を算出する
# 8:00 8:10 8:20 8:45
# 9:00 9:10 9:20 9:45
# ...
i=10;j=20;k=45
dia <- function(x){
if(x<i) return(i-x)
if(x<j) return(j-x)
if(x<k) return(k-x)
return(60-x)
}
dia=Vectorize(dia)
curve(dia(x),0,60,type='h')
integrate(dia,0,60)$value/60 Prudence, indeed, will dictate that "uraguchi" long established cannot be changed for light and transient causes;
and accordingly all experience has shown, that BMS are more disposed to suffer, while evils are sufferable, than to right themselves by abolishing the forms from which they can pursue profit.
But when a long train of misbehavior and misconduct , showing invariably the same Imbecility evinces a design to reveal themselves as absolute Bona Fide Moron ,
it is their right, it is their duty, to expel such "uraguchi", and to provide new guards for their future security. 東京駅からのぞみ号で朝8時から9時に出発する（9時発も可）。
無作為に選んだ8時台の時間に出発ホームに到着したとすると平均の待ち時間は何分か？
以下が東京発8時台発ののぞみ号の時刻表である。
8:00 8:10 8:13 8:20 8:23 8:30 8:40 8:47 8:50 9:00 # 8:00 8:10 8:13 8:20 8:23 8:30 8:40 8:47 8:50 9:00
nozomi=c(0,10,13,20,23,30,40,47,50,60)
x=diff(nozomi)
sum(x^2/2)/(sum(x))
mean(x^2)/(2*mean(x)) 救急車受け入れと新入院で手当がついたからステーキハウスの資金が出たな。 問題（第１種情報処理技術者試験・平成元年度春期午前問１７を改題）
ある医院では、患者が平均１０分間隔でポアソン到着にしたがって訪ねてくることがわかった。
医者は１人であり、１人の患者の診断及び処方にかかる時間は平均８分の指数分布であった。
設問１ 患者が待ち始めてから、診断を受け始めるまでの「平均待ち時間」を求めなさい。
設問２ 待っている患者の平均人数を求めなさい。
設問３ 患者の「平均待ち時間」が６０分となるような平均到着間隔は約何分か？秒単位を
切り捨てた値を答えなさい。
# 「平均待ち時間」を5分以下にするには同じ診察効率の医師が何人に必要か？
# その最小人数で「平均待ち時間」を5分以下に保って診療するには１時間に何人まで受付可能か？ MMS = function(n, lambda ,mu, s){
rho=lambda/mu # rho < s
sig=0
for(i in 0:s) sig=sig+rho^i/factorial(i)
p0=1/( sig + rho^(s+1)/factorial(s)/(s-rho) )
# Pn : probability of n guests in system
Pn=ifelse(n >= s, rho^n/factorial(s)/s^(n-s)*p0, rho^n/factorial(n)*p0)
Ps=rho^s/factorial(s)*p0
L=rho + Ps*s*rho/(s-rho)^2 # average guests in system
Lq=Ps*s*rho/(s-rho)^2 # average guests in que
Wq=Lq/lambda # average waiting time in que
c(`Pn(t)`=Pn,L=L,Lq=Lq,Wq=Wq)
}
sapply(1:3,function(x) MMS(0,1/10,1/8,x)['Wq'])
MMS(0,1/10,1/8,s=2)
f= function(l) MMS(0,l,mu=1/8,s=2)['Wq']
v=Vectorize(f)
curve(v(x),bty='l',0,2/8) # rho=l/m < s , l < s*m
abline(h=5,lty=3)
60*uniroot(function(x)v(x)-5,c(0.1,0.2))$root
MMS(0,9.3/60,mu=1/8,s=2) It is common knowledge among doctors and patients that Do-Teihen(exclusively bottom-leveled medical school) graduates mean morons who bought their way to Gachi'Ura(currently called by themselves)
According to the experience of entrance exam to medical school in the era of Showa, when the sense of discrimination against
privately-founded medical schools were more intense than it is now,
all such schools but for Keio had been so compared to some specialized institution for educable mentally retarded kids that nobody but imbecile successors of physicians in private practice had applied for admission.
There had been NOT a single classmate who chose willingly against his/her common sense to go to the Do-Teihen(exclusively bottom-leveled medical school, currently also known as Gachi'Ura),
which would have cost outrageous money and its graduates are destined to be called Uraguchi morons who bought thier way into the Do-Teihen, by thier colleagues and even by thier own clients.
Although people won't call them names to their face,
certain 80-90% people of about my age have been yet scorning and sneering at Uraguchi graduates, speaking in the back of our mind,
" Uraguchi morons shall not behave like somebody."
We never speak out face to face in real life. It is common knowledge among doctors and patients that Do-Teihen(exclusively bottom-leveled medical school) graduates mean morons who bought their way to Gachi'Ura(currently called by themselves)
According to the experience of entrance exam to medical school in the era of Showa, when the sense of discrimination against
privately-founded medical schools were more intense than it is now,
all such schools but for Keio had been so compared to some specialized institution for educable mentally retarded kids that nobody but imbecile successors of physicians in private practice had applied for admission.
There had been NOT a single classmate who chose willingly against his/her common sense to go to the Do-Teihen(exclusively bottom-leveled medical school, currently also known as Gachi'Ura),
which would have cost outrageous money and its graduates are destined to be called Uraguchi morons who bought thier way into the Do-Teihen, by thier colleagues and even by thier own clients.
Although people won't call them names to their face,
certain 80-90% people of about my age have been yet scorning and sneering at Uraguchi graduates, speaking in the back of our mind,
" Uraguchi morons shall not behave like somebody."
We never speak out face to face in real life. 日本の病院医療は全てに於いて金が掛かりすぎるという事が、現在、問題となっています。
健康保険制度も破綻の寸前まで来ている事が、厚労省幹部によりマスコミに報告されています。
国民から徴収している健康保険料では間に合わず、税金をジャブジャブ投入しているのが現状です。
それでも賄えない為、来年１０月から消費税が引き上げられます。
この逼迫する医療財政問題を一発で解消する方法が、実は海外で急激に進められている大麻の解禁なのです。
海外の報告に依れば、大麻はあらゆる難病に効果を発揮する事が分かって来ています。
ガン、エイズ、テンカン、パーキンソン病、リウマチ、鬱病、統合失調症など、
これまで不治の病とされてきたあらゆる難病に大麻が効果を発揮するのです。
大麻解禁は、世界の潮流です。
なぜ、世界中で大麻が解禁されているのか？
それは、あらゆる難病に効果を発揮する事が分かって来たからです。
しかも、どこでも育つ丈夫な植物ですから、安価に賄えるのです。
日本でも早急に大麻を解禁しましょう！
https://forbesjapan.com/articles/detail/24029
https://hypebeast.com/jp/2018/11/weed-the-people It is common knowledge among doctors and patients that Do-Teihen(exclusively bottom-leveled medical school) graduates mean morons who bought their way to Gachi'Ura(currently called by themselves)
According to the experience of entrance exam to medical school in the era of Showa, when the sense of discrimination against
privately-founded medical schools were more intense than it is now,
all such schools but for Keio had been so compared to some specialized institution for educable mentally retarded kids that nobody but imbecile successors of physicians in private practice had applied for admission.
There had been NOT a single classmate who chose willingly against his/her common sense to go to the Do-Teihen(exclusively bottom-leveled medical school, currently also known as Gachi'Ura),
which would have cost outrageous money and its graduates are destined to be called Uraguchi morons who bought thier way into the Do-Teihen, by thier colleagues and even by thier own clients.
Although people won't call them names to their face,
certain 80-90% people of about my age have been yet scorning and sneering at Uraguchi graduates, speaking in the back of our mind,
" Uraguchi morons shall not behave like somebody."
We never speak out face to face in real life. 来院数がポアソン分布（来院間隔は指数分布）、
診療時間はそれまでの患者の診療時間に影響されない（マルコフ性とか無記憶性と呼ばれる）ので指数分布
と仮定して、１時間に５人受診、診療時間は１０分を平均値として受診数を４０人としてシミュレーションすると
こんなにばらついた。
https://i.imgur.com/2HSJiRL.png
https://i.imgur.com/aG4ySWl.png
待ち時間行列理論でクリニックの待ち時間計算すると現実と大きく乖離すると思える。定常状態での公式を当て嵌めるのに難があるなぁ。 It is common knowledge among doctors and patients that Do-Teihen(exclusively bottom-leveled medical school) graduates mean morons who bought their way to Gachi'Ura(currently called by themselves)
According to the experience of entrance exam to medical school in the era of Showa, when the sense of discrimination against
privately-founded medical schools were more intense than it is now,
all such schools but for Keio had been so compared to some specialized institution for educable mentally retarded kids that nobody but imbecile successors of physicians in private practice had applied for admission.
There had been NOT a single classmate who chose willingly against his/her common sense to go to the Do-Teihen(exclusively bottom-leveled medical school, currently also known as Gachi'Ura),
which would have cost outrageous money and its graduates are destined to be called Uraguchi morons who bought thier way into the Do-Teihen, by thier colleagues and even by thier own clients.
Although people won't call them names to their face,
certain 80-90% people of about my age have been yet scorning and sneering at Uraguchi graduates, speaking in the back of our mind,
" Uraguchi morons shall not behave like somebody."
We never speak out face to face in real life. 到着がポアソン分布でなくてある時間がピークになるモデルでの平均待ち時間を計算するスクリプト
c2Wq <- function(c,a=360,b=1){ #-> Wq:平均待ち時間
# R(t): 到着率関数 -at(t-2b)
# c:サービス率
# R = function(t) ifelse(0<=t&t<=2*b,-a*t*(t-2*b),0)
N = 4*a*b^3/3 # integrate(R,0,2*b)
d = ifelse(b^2-c/a>=0,sqrt(b^2-c/a),0)
Wtotal=ifelse(2*d<b,9/4*a*d^4,a/36*(b+d)^3/(b-d)*(4*b*d-b^2-d^2))
Wq=Wtotal/N
return(Wq)
} > c2Wq(100)
[1] 1.472855
> c2Wq(200)
[1] 0.3536523
> c2Wq(300)
[1] 0.046875 Prudence, indeed, will dictate that "uraguchi" long established cannot be changed for light and transient causes;
and accordingly all experience has shown, that BMS are more disposed to suffer, while evils are sufferable, than to right themselves by abolishing the forms from which they can pursue profit.
But when a long train of misbehavior and misconduct , showing invariably the same Imbecility evinces a design to reveal themselves as absolute Bona Fide Moron ,
it is their right, it is their duty, to expel such "uraguchi", and to provide new guards for their future security. Prudence, indeed, will dictate that "uraguchi" long established cannot be changed for light and transient causes;
and accordingly all experience has shown, that BMS are more disposed to suffer, while evils are sufferable, than to right themselves by abolishing the forms from which they can pursue profit.
But when a long train of misbehavior and misconduct , showing invariably the same Imbecility evinces a design to reveal themselves as absolute Bona Fide Moron ,
it is their right, it is their duty, to expel such "uraguchi", and to provide new guards for their future security. 3S Policy Causes the ResultTruman of Panama document and 3S policy
We are keeping the citizens in a cage named "Freedom of Falsehood".
The way you just give them some luxury and convenience.Then release sports, screen, sex (3S).
Because the citizens are our livestock. For that reason, we must make it longevity. It makes it sick
(with chemicals etc.) and keeps it alive.This will keep us harvesting. This is also the authority
of the victorious country.The medal and the Nobel prize is not all Raoul declarationExamples of 3S policy
Hypocrites and disguised society and Panama document "He moved here here two years ago, I was afraid
of looking, but I thought it was a polite person to greet" Hello "when I saw it ... It was not like I was waking
this kind of incident ... ... "(Neighboring residents)On November 7, Shosuke Hotta, 42, a self-proclaimed office
worker in Sagamihara City, Kanagawa Prefecture, was arrested on suspicion of abusing her daughter Sakurai Ai.
This is the nature of the Earthlings 国試6周目終了 模試も合格圏内に入ってる 油断できないがまずまずだろう あとは弱点の強化と知識の維持
来年は研修医だな モチベーションは高く持ってる 最後まで頑張るぞ！ 平均したら 1日10時間以上勉強してたな グループで１つの部屋を借りてたから良かった Prudence, indeed, will dictate that "uraguchi" long established cannot be changed for light and transient causes;
and accordingly all experience has shown, that BMS are more disposed to suffer, while evils are sufferable, than to right themselves by abolishing the forms from which they can pursue profit.
But when a long train of misbehavior and misconduct , showing invariably the same Imbecility evinces a design to reveal themselves as absolute Bona Fide Moron ,
it is their right, it is their duty, to expel such "uraguchi", and to provide new guards for their future security. 3S Policy Causes the ResultTruman of Panama document and 3S policy
We are keeping the citizens in a cage named "Freedom of Falsehood".
The way you just give them some luxury and convenience.Then release sports, screen, sex (3S).
Because the citizens are our livestock. For that reason, we must make it longevity. It makes it sick
(with chemicals etc.) and keeps it alive.This will keep us harvesting. This is also the authority
of the victorious country.The medal and the Nobel prize is not all Raoul declarationExamples of 3S policy
Hypocrites and disguised society and Panama document "He moved here here two years ago, I was afraid
of looking, but I thought it was a polite person to greet" Hello "when I saw it ... It was not like I was waking
this kind of incident ... ... "(Neighboring residents)On November 7, Shosuke Hotta, 42, a self-proclaimed office
worker in Sagamihara City, Kanagawa Prefecture, was arrested on suspicion of abusing her daughter Sakurai Ai.
This is the nature of the Earthlings あるド底辺裏口シリツ医大のある学年に１００人の学生がいる。
１００人の学生は全員裏口入学である。
裏口入学を自覚したら翌日に退学しなければならない。
学生は自分以外の学生が裏口入学であるとことは全員知っているが自分が裏口入学であることは知らない。
教授が全員の前で「この学年には少なくとも一人が裏口入学している」と発言した。
この後、どうなるかを述べよ。 3S Policy Causes the ResultTruman of Panama document and 3S policy
We are keeping the citizens in a cage named "Freedom of Falsehood".
The way you just give them some luxury and convenience.Then release sports, screen, sex (3S).
Because the citizens are our livestock. For that reason, we must make it longevity. It makes it sick
(with chemicals etc.) and keeps it alive.This will keep us harvesting. This is also the authority
of the victorious country.The medal and the Nobel prize is not all Raoul declarationExamples of 3S policy
Hypocrites and disguised society and Panama document "He moved here here two years ago, I was afraid
of looking, but I thought it was a polite person to greet" Hello "when I saw it ... It was not like I was waking
this kind of incident ... ... "(Neighboring residents)On November 7, Shosuke Hotta, 42, a self-proclaimed office
worker in Sagamihara City, Kanagawa Prefecture, was arrested on suspicion of abusing her daughter Sakurai Ai.
This is the nature of the Earthlings 消化器に問題があって 絶食 捕液 抗生剤 投与が三日間必要となった時 忘れていけないのは なに？ そういえば食道がん術後にウェルニッケ作ったのもド底辺シリツ医大だったなぁ。 捕液はソルデム3 500 二回とソルデム1 一回でトータル1500 裏口入学が発覚した学生を除籍処分にしないシリツ医大って自浄作用を欠いているな。
こういう問題でド底辺シリツ医大卒の裏口入学馬鹿を排除すべきだあ。
ド底辺シリツ医大の裏口入学者が10人いたとする。
そのメンバーA,B,C,...,H,I,J の10人は全員が誰が嘘つきかは知っている。
正直者は常に正直に答えて、嘘つきは必ず嘘をつく
10人に「この中に嘘つきは何人いますか」と聞くと、下のように答えた。
A:1人,B：2人,C:3人,...,G:9人,J:10人
(1)嘘つきの組合せをすべて列挙せよ。
(2)別の10人に聞いたところ、こちらでは順に8, 9, 8, 2, 4, 4, 2, 3, 9, 8の答であった。嘘つきの組合せをすべて列挙せよ。 >>568
答は
＞消化器に問題があって
ではなくて
ド底辺シリツ医大卒の裏口馬鹿の頭に問題があるで終了。 こんな簡単な問題を解けないんなんて 国試は無理だねwww >>577
数学もできないお前は裏口入学なんだろ。
聖魔か？ Prudence, indeed, will dictate that "uraguchi" long established cannot be changed for light and transient causes;
and accordingly all experience has shown, that BMS are more disposed to suffer, while evils are sufferable, than to right themselves by abolishing the forms from which they can pursue profit.
But when a long train of misbehavior and misconduct , showing invariably the same Imbecility evinces a design to reveal themselves as absolute Bona Fide Moron ,
it is their right, it is their duty, to expel such "uraguchi", and to provide new guards for their future security. >>579
臨床で問題になるのはbacterial translocationだけじゃないからな。
問題設定がアホすぎ。
どこのド底辺シリツに裏口入学だい？ >>579
>572にこたえてみ！
数式もいらない、論理的思考ができるかが問われる問題な。 >>583
論理的思考できないとは。
やっぱり裏口入学なんだろう？
どこのド底辺？
統計処理からは都外ド底辺と推測されているがあってるか？ ド底辺スレでは聖魔と断定する投稿があったが、まあ、妥当な線だろうな。
これであっているのか？
66 卵の名無しさん sage 2018/10/08(月) 09:22:57.88 ID:mQHuWxdH
ド底辺聖マ卒 頭悪すぎ 裏口入学の学生を除籍処分にしないかぎり、信頼の回復はないね。つまり、いつまで経ってもシリツ医大卒＝裏口バカと汚名は拭えない。シリツ出身者こそ、裏口入学に厳しい処分せよを訴えるべき。
裏口入学医師の免許剥奪を！の国民運動の先頭に立てばよいぞ。
僕も裏口入学とか、言ってたら信頼の回復はない。 >>588
>572にこたえてみ！
数式もいらない、論理的思考ができるかが問われる問題。
知識を問うのではなく、論理的思考ができるかを問う問題。
つまり、裏口バカのスクリーニングに有用な問題な。 統計できない、英文かけない、数学できない、論理的思考もできない。
そんなバカがどうして大学に入れんだ？
やっぱり、あれ？
あれだろ？
あれ。
う
ら
ぐ
ち >>592
>572にこたえてみ！
数式もいらない、論理的思考ができるかが問われる問題。
知識を問うのではなく、論理的思考ができるかを問う問題。
つまり、裏口バカのスクリーニングに有用な問題な。 >>592
ｐHでの失活も考えずにフルカリックにラシックス混入するというド底辺シリツ医はお前か？ しろーとと話すと疲れる リアルな場面では知ったかぶりしない方がいいよ 基本ができてないらしい しょうがないかな？国試は無理です >>595
>>592
>572にこたえてみ！
数式もいらない、論理的思考ができるかが問われる問題。
知識を問うのではなく、論理的思考ができるかを問う問題。
つまり、裏口バカのスクリーニングに有用な問題な。 >>598
シリツ医の使命は裏口入学撲滅国民運動の先頭に立つことだよ。
裏口入学の学生を除籍処分にしないかぎり、信頼の回復はないね。つまり、いつまで経ってもシリツ医大卒＝裏口バカと汚名は拭えない。シリツ出身者こそ、裏口入学に厳しい処分せよを訴えるべき。
裏口入学医師の免許剥奪を！の国民運動の先頭に立てばよいぞ。
僕も裏口入学とか、言ってたら信頼の回復はない。 こういう簡単な問題を医師国家試験にいれて
できない椰子は裏口認定して振り落とせばいいのになぁ。
# １頁から始まる本が1枚だけページが破れた（その頁の表裏が欠損）本がある。
# 破れていないページ番号を合計すると15000になる。
# 破れたページは何ページ目だろうか？ >>595
ド底辺シリツ医大卒へ裏口入学した椰子って、数字も扱えないんだなぁ
数字なしのこれに答えてみ！
Ａ～Ｅの５人が次のように発言している
Ａ「Ｂはウソつきだ」
Ｂ「Ｃはウソつきではない」
Ｃ「Ｄ．Ｅはどちらもウソつきだ」
Ｄ「Ｅはウソつきだ」
Ｅ「私はウソつきではない」
５人のうち、何人かがウソをついている。このとき確実にいえることはどれか。
選択肢
１、Ａはウソつきである
２、Ｂはウソつきである
３、Ｃはウソつきではない
４、Ｄはウソつきである
５、Ｅはウソつきではない >>602
プログラムで解くのが楽しいよね。他にも応用が効くし。
dat=gtools::permutations(2,5,c(T,F),F,T)
colnames(dat)=LETTERS[1:5]
dat=as.data.frame(dat)
attach(dat)
dat[A&!B,] ; dat[!A&B,]
dat[B&C,] ; dat[!B&!C,]
dat[C&!(D&E),] ; dat[!C&(D&E),]
dat[D&!E] ; dat[!D&E]
dat[A&!B&C&!(D&E),]
dat[A&!B&C&(!D|!E),] >>604
裏口バカは数字も英語もできないのだから
どちらも要らない問題にしてやったぞ。
答えてみ！はよ！はよ！
裏口入学のド底辺シリツ医なら嘘は得意なんじゃね？
Ａ～Ｅの５人が次のように発言している
Ａ「Ｂはウソつきだ」
Ｂ「Ｃはウソつきではない」
Ｃ「Ｄ．Ｅはどちらもウソつきだ」
Ｄ「Ｅはウソつきだ」
Ｅ「私はウソつきではない」
５人のうち、何人かがウソをついている。このとき確実にいえることはどれか。
選択肢
１、Ａはウソつきである
２、Ｂはウソつきである
３、Ｃはウソつきではない
４、Ｄはウソつきである
５、Ｅはウソつきではない シリツ医の使命は裏口入学撲滅国民運動の先頭に立つことだよ。
裏口入学の学生を除籍処分にしないかぎり、信頼の回復はないね。つまり、いつまで経ってもシリツ医大卒＝裏口バカと汚名は拭えない。シリツ出身者こそ、裏口入学に厳しい処分せよを訴えるべき。
裏口入学医師の免許剥奪を！の国民運動の先頭に立てばよいぞ。
僕も裏口入学とか、言ってたら信頼の回復はない。 人間関係の薄い仕事はあるよ ハローワークで相談してみればいいんじゃ？ >>608
>>604
ド底辺シリツ医のって嘘で固めた人生だろ！？
裏口バカは数字も英語もできないのだから
どちらも要らない問題にしてやったぞ。
答えてみ！はよ！はよ！
裏口入学のド底辺シリツ医なら嘘は得意なんじゃね？
Ａ～Ｅの５人が次のように発言している
Ａ「Ｂはウソつきだ」
Ｂ「Ｃはウソつきではない」
Ｃ「Ｄ．Ｅはどちらもウソつきだ」
Ｄ「Ｅはウソつきだ」
Ｅ「私はウソつきではない」
５人のうち、何人かがウソをついている。このとき確実にいえることはどれか。
選択肢
１、Ａはウソつきである
２、Ｂはウソつきである
３、Ｃはウソつきではない
４、Ｄはウソつきである
５、Ｅはウソつきではない >>608
嘘つきが見ぬけないとどんな場面でも困るだろ？
答てみ！
はよ！はよ！ 朝苦手でないのなら新聞配達の仕事があるよ 月10万ぐらいだけど 精神科の先生に相談してみてはどうかな？負荷のかかる仕事は無理のようだしね 学校の用務員なら そんなに人と関わらなくてもいいし 公立だと退職金もあるのでは？ >>613
ド底辺シリツ医大に裏口入学という嘘で固めた人生なんだろ？
裏口バカは数字も英語もできないのだから
どちらも要らない問題にしてやったぞ。
答えてみ！はよ！はよ！
裏口入学のド底辺シリツ医なら嘘は得意なんじゃね？
Ａ～Ｅの５人が次のように発言している
Ａ「Ｂはウソつきだ」
Ｂ「Ｃはウソつきではない」
Ｃ「Ｄ．Ｅはどちらもウソつきだ」
Ｄ「Ｅはウソつきだ」
Ｅ「私はウソつきではない」
５人のうち、何人かがウソをついている。このとき確実にいえることはどれか。
選択肢
１、Ａはウソつきである
２、Ｂはウソつきである
３、Ｃはウソつきではない
４、Ｄはウソつきである
５、Ｅはウソつきではない >>612
嘘つきを見抜く頭脳もないのか？
周りもみんな裏口？？？？？？ こういうのが嘘つきな！
東京医大の事件で点数加算の不正まで発覚しているのに、
>裏？
>そんなのあるかよばか
だそうです。
http://imagizer.imageshack.com/img924/4761/OuxS6x.jpg 教育投資すれば普通はある程度の学力は身につく。
シリツ医大の高額学費が払える経済環境で教育投資したはず。
それでもド底辺シリツ医大にしか入れないのはそういうことだｗ．
そして、
ド底辺シリツ医大卒の医者は
数千万から億の金をド底辺シリツ医大に投資しているから
それを回収しようという行動にでる。 先ずは自分のことを考えた方がいいんじゃね？大きいことは言わないでさ 食べていけなくなるよ >>618
嘘つきも見抜けないってやっぱり馬鹿なの？
馬鹿なのにどうして大学入れたの？
やっぱり裏口？ 精神障害者向けの仕事はあるよ 先生に相談してみてはどうかな？ >>620
統計できない英文書けない数学できない論理的思考もできないって
馬鹿なの？
馬鹿なのにどうして大学入れたの？
裏口？ これであっているのか？
66 卵の名無しさん sage 2018/10/08(月) 09:22:57.88 ID:mQHuWxdH
ド底辺聖マ卒 頭悪すぎ >>623
んで、あんたどこに裏口入学？
一生卒業大学を隠すって哀れだね。
E[X^2]/2E[X]で待ち時間計算したいんだが
指数分布の二次モーメントっていくつだっけ？
Wikipediaみても書いてないや。
しょうがないから自分で計算。
∫k*exp(-k*x)*x^2 dx [0,∞]=2/k^2であってるか？ 優しい精神科の先生を見つけて これからのことを相談するのがいいのでは？それでは食べていけないよ >>626
卒業大学も言えないような大学になんぞ行きたくないよな？ ド底辺シリツ医大で指定医の不正取得で資格剥奪されたように
裏口入学学生も除籍処分すべきと思うだろ？ >>631
んで、あんたどこのド底辺シリツ医大卒？
裏口入学なんだろ？定積分もできないんだから。 分散、平均、二次モーメントの関係を使えば定積分なしで算出できる。統計のイロハも分かってないな。
やっぱりド底辺シリツ医大卒だろ。 これであっているのか？
66 卵の名無しさん sage 2018/10/08(月) 09:22:57.88 ID:mQHuWxdH
ド底辺聖マ卒 頭悪すぎ 優しい仲間と負荷のかからない簡単な作業をすることから始めるといいかもしれない >>635
これであっているのか？
66 卵の名無しさん sage 2018/10/08(月) 09:22:57.88 ID:mQHuWxdH
ド底辺聖マ卒 頭悪すぎ >>613
ド底辺シリツ医大に裏口入学という嘘で固めた人生なんだろ？
裏口バカは数字も英語もできないのだから
どちらも要らない問題にしてやったぞ。
答えてみ！はよ！はよ！
裏口入学のド底辺シリツ医なら嘘は得意なんじゃね？
Ａ～Ｅの５人が次のように発言している
Ａ「Ｂはウソつきだ」
Ｂ「Ｃはウソつきではない」
Ｃ「Ｄ．Ｅはどちらもウソつきだ」
Ｄ「Ｅはウソつきだ」
Ｅ「私はウソつきではない」
５人のうち、何人かがウソをついている。このとき確実にいえることはどれか。
選択肢
１、Ａはウソつきである
２、Ｂはウソつきである
３、Ｃはウソつきではない
４、Ｄはウソつきである
５、Ｅはウソつきではない 経済的にも精神的にも自立した時が寛解ですね 今は知るところでは残念ながら精神疾患に罹患していると言わざるを得ません 先ずは自分を知るところからです >>638
分散、平均、二次モーメントの関係を使えば定積分なしで算出できる。統計のイロハも分かってないな。
やっぱりド底辺シリツ医大へ裏口入学なんだろ？
自分を知ってる？
統計や英語はおろか、論理的思考もできない馬鹿と自覚してんの？
どこ卒？
これであっているのか？
66 卵の名無しさん sage 2018/10/08(月) 09:22:57.88 ID:mQHuWxdH
ド底辺聖マ卒 頭悪すぎ このプログラム動作確認できたがシミュレーションで検証するのが難しいな。
嘘つきがファジーとしてみました。
A,B,C,...,G,J,K 11人のうち、何人かが嘘つきで残りは正直者で
全員だれが嘘つきか知っている。
正直者は嘘をつかないが
嘘つきは嘘をつくこともつかないこともある。
11人に「うそつきは何人いますか」と聞くと、下のように答えました。
A:1人,B:2人,,...,J:10人,K:11人
誰が嘘つきでしょうか liars <- function(Answer,Strict=TRUE){ # duplicate answer and/or case of all liars permitted
N=length(Answer)
dat=gtools::permutations(2,N,0:1,set=F,rep=T)
check <- function(y,answer=Answer){
if(all(y==1)) {!all(1:N %in% answer)}
else{
if(Strict){all(answer[y==0]==sum(y)) & !(sum(y) %in% answer[y==1])}
else {all(answer[y==0]==sum(y))}
}
# all honest answer compatible & not included in liar's anwer
}
dat[apply(dat,1,check),]
}
liars(c(2,2,2,3,3))
liars(c(2,3,3,4,5),S=F)
liars(Answer<-sample(10,10,rep=T),S=F) ; Answer
liars(Answer)
sort(Answer)
liars(c(1, 2, 3, 4, 5, 5, 5, 5, 9, 9, 9),Strict=FALSE)
liars(c(1, 2, 3, 4, 5, 5, 5, 5, 9, 9, 9),Strict=TRUE) パッケージに依拠しているのでオンラインでの実行できるところが限られる。パッケージのコードを取り込むとコードが長くなる。
これが思案のしどころ。 それでは他人と良好な人間関係を結ぶのは無理でしょう リアルではどの世界のどなたにも相手はされません 要は人間性ですよ >>643
>>635
これであっているのか？
66 卵の名無しさん sage 2018/10/08(月) 09:22:57.88 ID:mQHuWxdH
ド底辺聖マ卒 頭悪すぎ >>641
外部パッケージgtoolsなしで動作するように改造
liars <- function(Answer,Strict=TRUE){ # duplicate answer and/or case of all liars permitted
N=length(Answer)
arg=list()
for(i in 1:N) arg[[i]]=0:1
dat=do.call(expand.grid,arg)
colnames(dat)=LETTERS[1:N]
check <- function(y,answer=Answer){
if(all(y==1)) {!all(1:N %in% answer)}
else{ # Stricy: all honest answer compatible & not included in liar's anwer
if(Strict){all(answer[y==0]==sum(y)) & !(sum(y) %in% answer[y==1])}
else {all(answer[y==0]==sum(y))}
}
}
dat[apply(dat,1,check),]
}
liars(Answer<-sample(10,10,rep=T),S=F) ; Answer
liars(Answer)
sort(Answer)
liars(c(1, 2, 3, 4, 5, 5, 5, 5, 9, 9, 9),Strict=FALSE)
liars(c(1, 2, 3, 4, 5, 5, 5, 5, 9, 9, 9),Strict=TRUE) 裏ビデオ出演とド底辺シリツ医大裏口入学を自認公言している医師がいるとする。
この医師が英文が読めなくて薬の投与量を間違えて患者が死亡したと仮定する。
Suppose one doctor admits he/she acted in uncencored porn movies, and he/she bribed his/her way into the DoTeihen medical school.
He/She overdosed a patient to death owing to English iliteracy
こういうアンケート（裁判官の心証の予想でもいいが）を考える。
Assume the following questionare, which may be substituted by impression to juries.
投与量を間違えたのは
(1)裏ビデオに出演するような医者だから
(2)ド底辺シリツ医大に裏口入学するような医者だから
He overdosed because
(1)he/she is such a doctor who acts in porn movies.
(2)he/she is such a doctor who briebs his/her way into Doteihen medical school
さてどちらが多数派だと予想されるか？
Which do you think is a major opinion? >>643
卒業校もひた隠しにするような椰子はやましいところがあるんだよね！ 学力不足を金で補うド底辺シリツの裏口バカが人間性ですってｗ > liars <- function(Answer,Strict=TRUE){ # duplicate answer and/or case of all liars permitted
+ N=length(Answer)
+ arg=list()
+ for(i in 1:N) arg[[i]]=0:1
+ dat=do.call(expand.grid,arg) # expand.grid(0:1,0:1,0:1,...,0:1)
+ colnames(dat)=LETTERS[1:N]
+ check <- function(y,answer=Answer){
+ if(all(y==1)) {!all(1:N %in% answer)}
+ else{ # Strict: all honest answer compatible & not included in liar's anwer
+ if(Strict){all(answer[y==0]==sum(y)) & !(sum(y) %in% answer[y==1])}
+ else {all(answer[y==0]==sum(y))}
+ }
+ }
+ dat[apply(dat,1,check),]
+ }
> > liars(Answer<-sample(10,10,rep=T),S=F) ; Answer
A B C D E F G H I J
832 1 1 1 1 1 1 0 0 1 1
888 1 1 1 0 1 1 1 0 1 1
952 1 1 1 0 1 1 0 1 1 1
1024 1 1 1 1 1 1 1 1 1 1
[1] 1 5 10 8 10 1 8 8 4 7
>
> liars(c(1, 2, 3, 4, 5, 5, 5, 5, 9, 9, 9),Strict=FALSE)
A B C D E F G H I J K
512 1 1 1 1 1 1 1 1 1 0 0
768 1 1 1 1 1 1 1 1 0 1 0
1280 1 1 1 1 1 1 1 1 0 0 1
2048 1 1 1 1 1 1 1 1 1 1 1
> liars(c(1, 2, 3, 4, 5, 5, 5, 5, 9, 9, 9),Strict=TRUE)
A B C D E F G H I J K
2048 1 1 1 1 1 1 1 1 1 1 1
無事動作確認！ >>650
gridの元の行番号表示は美しくないので改造。
liars <- function(Answer,Strict=TRUE){ # duplicate answer and/or case of all liars permitted
N=length(Answer)
arg=list()
for(i in 1:N) arg[[i]]=0:1
dat=do.call(expand.grid,arg) # expand.grid(0:1,0:1,0:1,...,0:1)
colnames(dat)=LETTERS[1:N]
check <- function(y,answer=Answer){
if(all(y==1)) {!all(1:N %in% answer)}
else{ # Strict: all honest answer compatible & not included in liar's anwer
if(Strict){all(answer[y==0]==sum(y)) & !(sum(y) %in% answer[y==1])}
else {all(answer[y==0]==sum(y))}
}
}
res=as.matrix(dat[apply(dat,1,check),])
rownames(res)=NULL
return(res)
}
liars(Answer<-sample(10,10,rep=T),S=F) ; Answer
liars(c(1, 2, 3, 4, 5, 5, 5, 5, 9, 9, 9),Strict=FALSE)
liars(c(1, 2, 3, 4, 5, 5, 5, 5, 9, 9, 9),Strict=TRUE) シリツ医の使命は裏口入学撲滅国民運動の先頭に立つことだよ。
裏口入学の学生を除籍処分にしないかぎり、信頼の回復はないね。つまり、いつまで経ってもシリツ医大卒＝裏口バカと汚名は拭えない。シリツ出身者こそ、裏口入学に厳しい処分せよを訴えるべき。
裏口入学医師の免許剥奪を！の国民運動の先頭に立てばよいぞ。
僕も裏口入学とか、言ってたら信頼の回復はない。 It is common knowledge among doctors and patients that Do-Teihen(exclusively bottom-leveled medical school) graduates mean morons who bought their way to Gachi'Ura(currently called by themselves)
According to the experience of entrance exam to medical school in the era of Showa, when the sense of discrimination against
privately-founded medical schools were more intense than it is now,
all such schools but for Keio had been so compared to some specialized institution for educable mentally retarded kids that nobody but imbecile successors of physicians in private practice had applied for admission.
There had been NOT a single classmate who chose willingly against his/her common sense to go to the Do-Teihen(exclusively bottom-leveled medical school, currently also known as Gachi'Ura),
which would have cost outrageous money and its graduates are destined to be called Uraguchi morons who bought thier way into the Do-Teihen, by thier colleagues and even by thier own clients.
Although people won't call them names to their face,
certain 80-90% people of about my age have been yet scorning and sneering at Uraguchi graduates, speaking in the back of our mind,
" Uraguchi morons shall not behave like somebody."
We never speak out face to face in real life. 3S Policy Causes the ResultTruman of Panama document and 3S policy
We are keeping the citizens in a cage named "Freedom of Falsehood".
The way you just give them some luxury and convenience.Then release sports, screen, sex (3S).
Because the citizens are our livestock. For that reason, we must make it longevity. It makes it sick
(with chemicals etc.) and keeps it alive.This will keep us harvesting. This is also the authority
of the victorious country.The medal and the Nobel prize is not all Raoul declarationExamples of 3S policy
Hypocrites and disguised society and Panama document "He moved here here two years ago, I was afraid
of looking, but I thought it was a polite person to greet" Hello "when I saw it ... It was not like I was waking
this kind of incident ... ... "(Neighboring residents)On November 7, Shosuke Hotta, 42, a self-proclaimed office
worker in Sagamihara City, Kanagawa Prefecture, was arrested on suspicion of abusing her daughter Sakurai Ai.
This is the nature of the Earthlings >>651
問題を数学板に書いたらHASKELLでの解法がレスされた。
Rの結果と一致したので数学板でも公開した。 普通の学力があればこういう問題を知ると解かずにはいられない、解けなくても考えずにはいられないというのが普通だよなぁ。
A,B,C,...,G,J,K 11人のうち、何人かが嘘つきで残りは正直者で
全員だれが嘘つきか知っている。
正直者は嘘をつかないが
嘘つきは嘘をつくこともつかないこともある。
11人に「うそつきは何人いますか」と聞くと、下のように答えました。
A:1人,B:2人,,...,J:10人,K:11人
誰が嘘つきでしょうか 先ずは人間関係の負荷がかからない軽作業をすることだな >>659
俺のバイト先は半日で５万、自宅からのタクシーチケット付き。 パン工場なんかは 人間関係が薄いから向いてるんじゃね？ 職場と信頼関係あるからタクシーチケット帳毎支給される。
上限１万のチケット５０枚綴り。
信頼関係の基礎に卒業校が関係しているのも明らか。
副院長の子供が俺の同窓生という縁故もあるけど。 >>661
んで、あんたどこ卒？
聖魔か不治多だろ？ 麻酔科とかもペインをしなけりゃ患者との人間関係は希薄だよなぁ。
画像診断の放射線や病理もそうだけど、こっちは臨床医との人間関係が大切。 今日は当直代休で終日休み、定期受診の歯医者に行って来た。
行きつけの歯医者も俺の卒業校を知っているので優先診療してくれる。国立の母校に歯学部があってラッキーで(・∀・)ｲｲ!! >>667
いや、看護師の学力すらないからド底辺シリツ医大の裏口入学以外にはありえんよ。 オンコビンの投与スケジュールに疑問を投げかけた看護師を無視して抗がん剤過剰投与で女子高校生を死に至らしめたのも
オマエと同じド底辺シリツ医だよ！ シリツ医の使命は裏口入学撲滅国民運動の先頭に立つことだよ。
裏口入学の学生を除籍処分にしないかぎり、信頼の回復はないね。つまり、いつまで経ってもシリツ医大卒＝裏口バカと汚名は拭えない。シリツ出身者こそ、裏口入学に厳しい処分せよを訴えるべき。
裏口入学医師の免許剥奪を！の国民運動の先頭に立てばよいぞ。
僕も裏口入学とか、言ってたら信頼の回復はない。 他人のことはいいから 自分の生活を考えた方がいいよ ハローワーク行かんとね 我が母校医科歯科の学生会館の掲示
自己の存在が問われない闘いは虚ろな闘いだ。 >>673
裏口入学のサノは除籍すべきと思わんか？ うまく人間関係作るのは あんたには無理なので 軽作業から始めるといいよ >>677
んであんたどこ卒？
俺、医科歯科。
入学は二期校の頃。
一期は滑り止めに理一。 浪人したくなかったから模試判定Aのところしか受けなかった。 君にはなかなか合う仕事はないね 精神科の先生に相談するのがいいのでは？ >>677
ド底辺シリツ医と良好な人間関係って
暴走族やチンピラから俺のダチだぜ、と言われるようなものだぞ。 学会の講演でも講師の卒業大学から紹介が始まるだろ。
んで、あんたどこ卒？ どこでもトラブル起こしちゃうもんね それはあなた自身に問題があるんだよ 今後はド底辺シリツ医大に裏口で入学しという紹介にすべきかもな。 職場と信頼関係あるからタクシーチケット帳毎支給される。
上限１万のチケット５０枚綴り。
信頼関係の基礎に卒業校が関係しているのも明らか。
副院長の子供が俺の同窓生という縁故もあるけど。 まあ、ド底辺シリツ医大卒が院長とかやってたら
ド底辺シリツ医を採用しないだろうな。
自分自身で実態を把握しているだろうから。
オマエの母校に母校卒の教授っている？ これに同意できるだろ？
シリツ医の使命は裏口入学撲滅国民運動の先頭に立つことだよ。
裏口入学の学生を除籍処分にしないかぎり、信頼の回復はないね。つまり、いつまで経ってもシリツ医大卒＝裏口バカと汚名は拭えない。シリツ出身者こそ、裏口入学に厳しい処分せよを訴えるべき。
裏口入学医師の免許剥奪を！の国民運動の先頭に立てばよいぞ。
僕も裏口入学とか、言ってたら信頼の回復はない。 医局はともかく パラメディカルとの関係は厳しいぞ バカにされちゃうよ >>690
一般リーマン家庭出身のコメディカルにプライベートで
ド底辺シリツ医を蔑む発言をすると受けるんだよね。 コンビニ弁当を作る仕事があるぞ おばちゃんが多いから優しくしてくれるかもな ド底辺シリツ医ってこういうのもできない馬鹿揃い。
普通の学力があればこういう問題を知ると解かずにはいられない、解けなくても考えずにはいられないというのが普通だよなぁ。
A,B,C,...,G,J,K 11人のうち、何人かが嘘つきで残りは正直者で
全員だれが嘘つきか知っている。
正直者は嘘をつかないが
嘘つきは嘘をつくこともつかないこともある。
11人に「うそつきは何人いますか」と聞くと、下のように答えました。
A:1人,B:2人,,...,J:10人,K:11人
誰が嘘つきでしょうか >>692
>>680
んで、あんたどこ卒？
聖魔かな？ いっそのこと農業はどうかな？ 人手不足だし 1人の時間が多いぞ >>695
んで、あんたどこ卒？
聖魔かな？
恥ずかしくて答えられない？？ >>695
農業はバイオの時代だから、ド底辺シリツより難しいぞ。
そういえば、東大農学部獣医学科卒の再受験組が同期にいたよ。 行動科学やっている文系の人の方が臨床医よりずっと統計ができるよね。
ベイズ統計の応用にも熱心。 このスレにのタイトルをみて書き込むド底辺シリツ医大卒は頭が悪いことを実証したいらしいね。
Last but not least, three laws of Do-Teihen Medical School, currently called Gachi'Ura by its graduates.
最後にド底辺医大の三法則を掲げましょう。
1: It is not the bottom medical school but its enrollee that is despicable, which deserves to be called a bona fide moron beyond redemption.
ド底辺シリツ医大が悪いのではない、本人の頭が悪いんだ。
2: The graduates of Do-Teihen are so ashamed that none of them dare to mention their own alma mater they had gone through.
ド底辺シリツ医大卒は恥ずかしくて、学校名を皆さま言いません。
3: The Do-Teihen graduates are so ashamed of having bought their way into the exclusively bottom-leveled medical school
that they tend to call a genuine doctor a charlatan who elucidates their imbecility.
ド底辺特殊シリツ医大卒は裏口入学の負い目から裏口馬鹿を暴く人間を偽医者扱いしたがる。 裏口入学が発覚しても裏口入学の学生を除籍処分しないド底辺シリツ医大の存在は
第一法則を脅かすよね
1: It is not the bottom medical school but its enrollee that is despicable, which deserves to be called a bona fide moron beyond redemption.
ド底辺シリツ医大が悪いのではない、本人の頭が悪いんだ。 ド底辺シリツ第一法則改定案
1: It is not only the lowerst-tiered medical school but intrinsically its enrollee that is despicable, which deserves to be called a bona fide moron beyond redemption.
ド底辺シリツ医大だけが悪いのではない、もともと本人の頭悪いんだ。 本日の暇つぶし
スクリプト改造より問題制作の方が手間がかかるなぁ。
数学版でHASKELLでの解答と一致したからプログラムに自信が持てて( ・∀・)ｲｲ!!
問題はこれ
ド底辺シリツ医大に裏口入学疑いが10人(A,B,..J)いたとする。
その10人は全員が誰が嘘つきかは知っている。
正直者は常に正直に答えるが、嘘つきは嘘をつくこともつかないこともある。
10人に「この中に嘘つきは何人いますか」と聞くと、
10人の答はAから順に4,5,5,6,7,7,8,8,9,10人の答であった。
正直者の可能性があるのは誰か述べよ。 興奮状態ですね 何を言っても通じません 少し時間が必要です 私は精神科病棟の看護師ですが こういう人はよくいますが 対応が難しいです >>705
いや、ド底辺シリツ医大卒だろ。看護師より馬鹿なのはド底辺シリツ医以外にはありえない。 >>704
ド底辺シリツ医だから、
馬鹿は、死ななきゃ治らない、の対偶も超えられないはず。
違うなら、答えてみ！ >>703
これに同意できるだろ？
シリツ医の使命は裏口入学撲滅国民運動の先頭に立つことだよ。
裏口入学の学生を除籍処分にしないかぎり、信頼の回復はないね。つまり、いつまで経ってもシリツ医大卒＝裏口バカと汚名は拭えない。シリツ出身者こそ、裏口入学に厳しい処分せよを訴えるべき。
裏口入学医師の免許剥奪を！の国民運動の先頭に立てばよいぞ。
僕も裏口入学とか、言ってたら信頼の回復はない。 E[W] = E「X^2]/2E[X]
= ( V[X] + E[X]^2 ) /2E[X] ∵ 分散=E[X^2]-E[X]^2
到着間隔が λexp(-λx)の指数分布のとき
(1/λ^2 + (1/λ)^2)/(2/λ) = 1/λ = E[X]
間隔 a 一様分布なら
∫(a-t)dt[0,a] da /a = a/2 どういう職場でもトラブルメーカーっているよね 困ったもんだ うちの精神科病棟の患者にもいる でも退院は難しいしな >>710
>>695
んで、あんたどこ卒？
聖魔かな？
恥ずかしくて答えられない？？ >>710
東京医大の件があるから改定案を出してみた。
当事者としてどう思う？
ド底辺シリツ第一法則改定案
1: It is not only the lowerst-tiered medical school but intrinsically its enrollee that is despicable, which deserves to be called a bona fide moron beyond redemption.
ド底辺シリツ医大だけが悪いのではない、もともと本人の頭悪いんだ。 >>710
脱字修正
東京医大の件があるから改定案を出してみた。
当事者としてどう思う？
ド底辺シリツ第一法則改定案
1: It is not only the lowerst-tiered medical school but intrinsically its enrollee that is despicable, which deserves to be called a bona fide moron beyond redemption.
ド底辺シリツ医大だけが悪いのではない、もともと本人の頭が悪いんだ。 >>709
到着間隔時間が指数分布の平均1/λと同じ
即ち[0,2/λ]の区間で一様分布とすると
指数分布の時（つまりポアソン過程での到着）より平均待ち時間が短くなる。 >>709
訂正、パルス状で間隔一定のときは一様分布じゃないな。 東京駅からのぞみ号で朝8時から9時に出発する（9時発も可）。
無作為に選んだ8時台の時間に出発ホームに到着したとすると平均の待ち時間は何分か？
以下が東京8時台発のぞみ号の時刻表である。
8:00 8:10 8:13 8:20 8:23 8:30 8:40 8:47 8:50 9:00
tt=c(0,10,13,20,23,30,40,47,50,60) # time table
ct2wt <- function(x){ # clock time to waiting time
n=length(tt)
if(x<=tt[1]){w8=tt[1]-x
}else{
for(i in 1:(n-1)){
if(tt[i]<=x & x<=tt[i+1]){
w8=(tt[i+1]-x)
break
}
}}
return(w8)
}
ct2wt=Vectorize(ct2wt)
curve(ct2wt(x),0,60,type='h',bty='l')
integrate(ct2wt,0,60)$value/60
(x=diff(tt))
sum(x^2/2)/sum(x)
(var(x)*(length(x)-1)/length(x)+mean(x)^2)/mean(x)/2 分散=E[X^2]-E[X]^2 これは標本分散で成立する式で不偏分散で計算すると二次モーメントが違ってくるな。
１００万個のサンプルでシミュレーションするときは影響がないが、のぞみの発車時刻とかだ２桁だから違いがでてくる。
これを補正して
> noz2w8 <- function(tt){ # tt=c(0,10,13,20,23,30,40,47,50,60) # time table
+ x=diff(tt)
+ n=length(x)
+ V=var(x)*(n-1)/n
+ w8=(V+mean(x)^2)/2/mean(x) # E[X2]/2E[X]
+ return(w8)
+ }
> noz2w8(c(0,10,13,20,23,30,40,47,50,60))
[1] 3.95 直接二次モーメントをRに計算させても同じ。
d2w8 <- function(x){
c(mean=mean(x),var=var(x),w8=mean(x^2)/mean(x)/2) # w8=E[X2]/2E[X]
}
> d2w8(diff(tt))
mean var w8
6.666667 9.250000 3.950000 バスの到着時間の間隔が
平均１０分の一様分布、指数分布、パルス状の一定分布に従うときの平均待ち時間のシミュレーション
> d2w8 <- function(x){# w8=E[X2]/2E[X]=(V[X]+E[X]^2)/2E[X]
+ c(mean=mean(x),var=var(x),w8=mean(x^2)/mean(x)/2)
+ }
> N=1e6
> d2w8(runif(N,0,20)) # unif average:10
mean var w8
9.998266 33.307418 6.664791
> d2w8(rexp(N,1/10)) # exp average:10
mean var w8
10.00303 100.00217 10.00010
> d2w8(rep(10,N)) # regular interval 10
mean var w8
10 0 5 >>716
大変なのはド底辺シリツ医大の教員じゃね。
先生、モルってなんですか？と化学の授業で質問する椰子がいるのがド底辺シリツ。 午前勤務が終わって11:30-13:00に最寄り駅に到着。
到着する時刻はランダム(一様分布)に設定。
時刻表は
11:36
11:46
11:55
12:13
12:34
12:56
13:21
駅での平均待ち時間は？ tt=c(6,16,25,43,64,86,111) # time since11:30
ct2wt <- function(x){ # tt to waiting time
n=length(tt)
if(x<=tt[1]){w8=tt[1]-x
}else{
for(i in 1:(n-1)){
if(tt[i]<=x & x<=tt[i+1]){
w8=(tt[i+1]-x)
break
}
}}
return(w8)
}
ct2wt=Vectorize(ct2wt)
curve(ct2wt(x),0,90,type='h',bty='l')
integrate(ct2wt,0,90)$value/90
x=diff(tt)
sum(x^2/2)/sum(x) 0､1の組み合わせをHaskellだと１行でつくっちゃうなぁ。
遅延評価なのでメモリ不足に陥りにくい。
for loop頭には難解
zeroOne n = (!! n) $ iterate (\x-> [a:b|a<-[0,1],b<-x]) [[]] It is common knowledge among doctors and patients that Do-Teihen(exclusively bottom-leveled medical school) graduates mean morons who bought their way to Gachi'Ura(currently called by themselves)
According to the experience of entrance exam to medical school in the era of Showa, when the sense of discrimination against
privately-founded medical schools were more intense than it is now,
all such schools but for Keio had been so compared to some specialized institution for educable mentally retarded kids that nobody but imbecile successors of physicians in private practice had applied for admission.
There had been NOT a single classmate who chose willingly against his/her common sense to go to the Do-Teihen(exclusively bottom-leveled medical school, currently also known as Gachi'Ura),
which would have cost outrageous money and its graduates are destined to be called Uraguchi morons who bought thier way into the Do-Teihen, by thier colleagues and even by thier own clients.
Although people won't call them names to their face,
certain 80-90% people of about my age have been yet scorning and sneering at Uraguchi graduates, speaking in the back of our mind,
" Uraguchi morons shall not behave like somebody."
We never speak out face to face in real life. "受験の偏差値は成績が平均５０標準偏差１０の正規分布を仮定している。
平均５０標準偏差１０の一様分布を仮定すると、
正規分布での偏差値４０は一様分布ではいくらに相当するか？"
m=50
sd=10
var=sd^2 # w^2/12
(w=sqrt(12)*sd)
curve(dunif(x,m-w/2,m+w/2), m-w,m+w)
r=runif(1e6,m-w/2,m+w/2)
mean(r) ; sd(r)
curve(dnorm(x,50,10),0,100)
H=20:80
(pn=pnorm(H,50,10))
punif(H,m-w/2,m+w/2)
plot(H,qunif(pn,m-w/2,m+w/2),type='l',bty='l',asp=1,xlab='norm',ylab='unif')
abline(a=0,b=1,col=8) >>726
平均100で標準偏差15がIQだったかな。
15でないのもあるみたいだけど。 >>723
いつも10分程度の待ちだから合致しているな。 これをプログラムで解くのが次の暇つぶし。
正直者は嘘をつかないが
嘘つきは嘘をつくこともつかないこともある。
Ａ～Ｅの５人が次のように発言している
Ａ「Ｂはウソつきだ」
Ｂ「Ｃはウソつきではない」
Ｃ「Ｄ．Ｅはどちらもウソつきだ」
Ｄ「Ｅはウソつきだ」
Ｅ「私はウソつきではない」
５人のうち、正直者と嘘つきは誰か？
可能性のある組合せをすべて示せ。 常識的に考えて 自分の出身校を こんな掲示板で教える人なんていませんよ そこからして非常識極まりない人です まずは自分のこと考えるのがいいんじゃないの？他人のことや大きな話をするより先にね きちんと先生にアドバイスしてもらってさ >>730
母校に誇りないの？
接骨院板で会話した岡山大学卒も母校には誇りがあるから名乗れるよと、俺と同じ意見だったな。
数学板で時々、意見交換している相手は東大卒。 >>730
んで、あんたどこ卒？
恥ずかしくて名乗れなくて神学部卒とか精神科の看護師だとうそぶくド底辺シリツ医もいたなぁ。 数学板でHaskellコードが投稿されたけど難読で解説してもらった。
それを受けてRでプログラム。
# dat : all possible combinations
n=5 ;arg=list()
for(i in 1:n) arg[[i]]=0:1
dat=do.call(expand.grid,arg) # expand.grid(0:1,0:1,...)
dat=as.matrix(dat)
colnames(dat)=LETTERS[1:n]
# A=>!B, B=>C, C=>!D&!E, D=>!E, E=>E
is.compati<-function(i,x){ # i:index of honest, x: possible combination
switch(i, # 1..n
x['B']==0, # testified by A (=LETTERS[1])
x['C']==1, # testified by B (=LETTERS[2])
x['D']==0 & x['E']==0, # ...
x['E']==0,
x['E']==1)
}
check=function(x){
re=NULL
honest=which(x==1) # index of honest
for(i in honest){
re=append(re,is.compati(i,x))
}
all(re)
}
dat[apply(dat,1,check),] >>729
これをプログラムなしでブール代数で解いちゃう頭脳には感激したな。 >>734
これに同意できるだろ？
シリツ医の使命は裏口入学撲滅国民運動の先頭に立つことだよ。
裏口入学の学生を除籍処分にしないかぎり、信頼の回復はないね。つまり、いつまで経ってもシリツ医大卒＝裏口バカと汚名は拭えない。シリツ出身者こそ、裏口入学に厳しい処分せよを訴えるべき。
裏口入学医師の免許剥奪を！の国民運動の先頭に立てばよいぞ。
僕も裏口入学とか、言ってたら信頼の回復はない。 5ちゃんねるでマジになるとはw 嘘だらけの世界ですよ バカだなーwww >>739
嘘だらけなのはド底辺シリツ医大裏口入学のオマエの人生じゃね。 まずは リアルでの自分のこと考えないと食べていけなくなるよ もう遅いかもしれないけどね >>730
んで、あんたどこ卒？
恥ずかしくて名乗れなくて神学部卒とか精神科の看護師だとうそぶくド底辺シリツ医もいたなぁ。 生活に余裕があるから道楽でプログラミングで遊べるんだね。
んで、あんたどこ卒？
都外のド底辺シリツと推測されてるが、聖魔？ >>735
プログラムできたから
誰が嘘つき証言の設定を変えたり人数を変更しても答が出せて( ・∀・)ｲｲ!! >>742
>>710
>>695
んで、あんたどこ卒？
聖魔かな？
恥ずかしくて答えられない？？ >>735
完成してみれば大したことはやってないな。
嘘つきが嘘をつくこともつかないこともあるというのが難しく思えた原因だな。 ふふふ 大うそつきか ハローワーク行くんだな www 捕液量とかどうしたらいいかな？サチュレーション 80％ほどだがなぁ酸素どれくらい行こうかな？ >>742
>>710
>>695
んで、あんたどこ卒？
聖魔かな？
恥ずかしくて答えられない？？ >>749
簡単だよ。
ド底辺シリツ医を主治医から外す。
シリツ医の使命は裏口入学撲滅国民運動の先頭に立つことだよ。
裏口入学の学生を除籍処分にしないかぎり、信頼の回復はないね。つまり、いつまで経ってもシリツ医大卒＝裏口バカと汚名は拭えない。シリツ出身者こそ、裏口入学に厳しい処分せよを訴えるべき。
裏口入学医師の免許剥奪を！の国民運動の先頭に立てばよいぞ。
僕も裏口入学とか、言ってたら信頼の回復はない。 やっぱりわからないんだね 心不全の治療は基本ですよwww >>751
どちらの病院ですかね？
ド底辺シリツ医大の場末のジッツ？ >>754
>>742
>>710
>>695
んで、あんたどこ卒？
聖魔かな？
恥ずかしくて答えられない？？ やはり答えられないんですかね？
学会でも演者紹介には卒業大学を述べるのが高齢ですよ。 >>742
>>710
>>695
んで、あんたどこ卒？
聖魔かな？
恥ずかしくて答えられない？？ >>754
>>734
これに同意できるだろ？
シリツ医の使命は裏口入学撲滅国民運動の先頭に立つことだよ。
裏口入学の学生を除籍処分にしないかぎり、信頼の回復はないね。つまり、いつまで経ってもシリツ医大卒＝裏口バカと汚名は拭えない。シリツ出身者こそ、裏口入学に厳しい処分せよを訴えるべき。
裏口入学医師の免許剥奪を！の国民運動の先頭に立てばよいぞ。
僕も裏口入学とか、言ってたら信頼の回復はない。 専門医スレでも
これに答えられない椰子ばかり。
大学出てんのか、というレベルだな。
平均０、分散１の正規分布の９５％信頼区域は[-1.96,1.96]で区域長は約3.92である。
平均０、分散１の一様分布の９５％信頼区域の区域長さはいくらか？ >>760
>>742
>>710
>>695
んで、あんたどこ卒？
聖魔かな？
恥ずかしくて答えられない？？ >>760
症例提示の基本すらできてないって、あんたどこ卒？
聖魔かな？
恥ずかしくて答えられない？？ 熱も出てきたな 抗生剤何行こうかな？ 脱水も合併してるな >>761
患者にド底辺シリツの裏口医ですとちゃんと告げているか？
告げないと期待権の侵害になるぞ！ >>765
>>760
>>742
>>710
>>695
んで、あんたどこ卒？
聖魔かな？
恥ずかしくて答えられない？？ >>765
これに答が出せるような大学でてないだろ？
平均０、分散１の正規分布の９５％信頼区域は[-1.96,1.96]で区域長は約3.92である。
平均０、分散１の一様分布の９５％信頼区域の区域長さはいくらか？ ハローワーク行こうね あんたは嘘つきだし 医師免許もないんだろ かわいそうに >>769
>>765
>>760
>>742
>>710
>>695
んで、あんたどこ卒？
聖魔かな？
恥ずかしくて答えられない？？
校名すら名乗れないようなクズ大学と自覚せざるを得ない椰子は哀れだね。 >>771
>>730
母校に誇りないの？
接骨院板で会話した岡山大学卒も母校には誇りがあるから名乗れるよと、俺と同じ意見だったな。
数学板で時々、意見交換している相手は東大卒。 >>722
こういうのを学習していたつもりなんだが数学板に面白い問題がでるとつい嵌ってしまう。 どしろーとwww ハローワーク明日行ったらどうですか？ >>771
ド底辺君、これできる？
全員嘘つき以外にも複数答があるんだが
一つ答えてみ。
数式も必要ないので論理的思考ができるかが問われる問題。
正直者は嘘をつかないが
嘘つきは嘘をつくこともつかないこともある。
Ａ～Ｅの５人が次のように発言している
Ａ「Ｂはウソつきだ」
Ｂ「Ｃはウソつきではない」
Ｃ「Ｄ．Ｅはどちらもウソつきだ」
Ｄ「Ｅはウソつきだ」
Ｅ「私はウソつきではない」
５人のうち、正直者と嘘つきは誰か？
可能性のある組合せは複数ある。 >>775
>>771
>>730
母校に誇りないの？
接骨院板で会話した岡山大学卒も母校には誇りがあるから名乗れるよと、俺と同じ意見だったな。
数学板で時々、意見交換している相手は東大卒。 >>775
明日はタクシーチケット付きで内視鏡バイト。 これは俺の投稿。
979 卵の名無しさん sage 2018/11/30(金) 15:45:37.98 ID:yDwg2Dxx
>>977
緊急なら側視のみだろね。
予定の手技なら直視でのスクリーニングも要るんじゃね？
俺、食道がんと膵臓がん（体尾部切除で済んだ）の合併例の手術経験があるなぁ。脾動脈結紮したら大網が真っ黒になってあわてた。 >>780
>>775
>>771
>>730
母校に誇りないの？
接骨院板で会話した岡山大学卒も母校には誇りがあるから名乗れるよと、俺と同じ意見だったな。
数学板で時々、意見交換している相手は東大卒。 >>780
>>769
>>765
>>760
>>742
>>710
>>695
んで、あんたどこ卒？
聖魔かな？
恥ずかしくて答えられない？？
校名すら名乗れないようなクズ大学と自覚せざるを得ない椰子は哀れだぞ。
裏口入学なんだろ？ 同じことを話をして 誤魔化す人 精神科病棟の患者さんによくいますw 解熱剤はアンヒバ挿肛したけどタキルんだよね どうしようかな？ >>771
ド底辺君、これできる？
全員嘘つき以外にも複数答があるんだが
一つ答えてみ。
数式も必要ないので論理的思考ができるかが問われる問題。
正直者は嘘をつかないが
嘘つきは嘘をつくこともつかないこともある。
Ａ～Ｅの５人が次のように発言している
Ａ「Ｂはウソつきだ」
Ｂ「Ｃはウソつきではない」
Ｃ「Ｄ．Ｅはどちらもウソつきだ」
Ｄ「Ｅはウソつきだ」
Ｅ「私はウソつきではない」
５人のうち、正直者と嘘つきは誰か？
可能性のある組合せは複数ある。 カッコつけてる割には頭悪いんだね ささっとハローワーク行こうね まずは軽作業からだね フォーカスは肺炎だな 誤嚥したのかな？抗生剤は何にしようかな？ Prudence, indeed, will dictate that "uraguchi" long established cannot be changed for light and transient causes;
and accordingly all experience has shown, that BMS are more disposed to suffer, while evils are sufferable, than to right themselves by abolishing the forms from which they can pursue profit.
But when a long train of misbehavior and misconduct , showing invariably the same Imbecility evinces a design to reveal themselves as absolute Bona Fide Moron ,
it is their right, it is their duty, to expel such "uraguchi", and to provide new guards for their future security. サチュレーション90％ 維持した 酸素量はどのくらいいったのでしょうか？ >>800
>>780
>>769
>>765
>>760
>>742
>>710
んで、あんたどこ卒？
聖魔かな？
恥ずかしくて答えられない？？
校名すら名乗れないようなクズ大学と自覚せざるを得ない椰子は哀れだぞ。
裏口入学なんだろ？ >>804
患者はあんたがド底辺シリツ医大卒だと知ってんの？
告げてなけりゃ期待権の侵害だぞ。 >>804
先ず、患者に自分がド底辺シリツ医大卒であることを告げる。
更に裏口入学であることも伝えれば正直者と認めてくれるかもしれん。
まずはそれからだ。
学会の講演でも講師の卒業大学から紹介が始まるだろ。
んで、あんたどこ卒？ さ、あんたは今日することは ハローワーク行くことだねwww >>807
抗がん剤過剰投与されて亡くなった女子高校生の親の手記には
亡くなった本人は主治医が東大卒と誤認していたことが記されている。 >>807
今日はタクシーで内視鏡バイトの日。
先ず、患者に自分がド底辺シリツ医大卒であることを告げる。
更に裏口入学であることも伝えれば正直者と認めてくれるかもしれん。
まずはそれからだ。
学会の講演でも講師の卒業大学から紹介が始まるだろ。
抗がん剤過剰投与されて亡くなった女子高校生の親の手記には
亡くなった本人は主治医が東大卒と誤認していたことが記されている。
んで、あんたどこ卒？ >>807
母校に誇りないの？
接骨院板で会話した岡山大学卒も母校には誇りがあるから名乗れるよと、俺と同じ意見だったな。
数学板で時々、意見交換している相手は東大卒。 >>807
こんなこと言われてるよ。
やっぱり、ド底辺シリツ医大卒なんだね。
底辺私立医大を卒業した医者って頭悪いよね？ Part10
https://egg.5ch.net/test/read.cgi/hosp/1537867846/801
801 名前：卵の名無しさん[] 投稿日：2018/12/06(木) 02:44:11.22 ID:nBMBFJg5
シリツ卒のあほはさっさと死ね！ 藤田保健衛生大病院（愛知県豊明市）で手術後、ビタミンＢ１を点滴されず、脳に障害が残り運動まひになったとして、
愛知県知多市の男性（６０）が同病院を運営する藤田学園（同）に慰謝料など約１億６千万円の損害賠償を求めた訴訟で、
名古屋地裁は１５日、約１億２千万円の支払いを命じた。
判決によると、男性は２００９年７月、同病院で食道がんの手術を受けた後、３週間絶食し、栄養補給のため点滴していた。
だが、ビタミンＢ１が含まれていなかったため、脳に障害が残り、車いすや歩行器具を使って生活している。
判決理由で朝日貴浩裁判長は「ビタミンＢ１が投与されなかったことと脳の後遺症には因果関係がある」と、男性の主張を大筋で認めた。
藤田学園は「判決を見ていないので、コメントは差し控える」としている。
http://www.chunichi.co.jp/s/article/2016071590230952.html
＞ビタミンやミネラルは、毎日は取る必要がないが、長い間、まったく取らないと、病気になる。
＞ビタミンやミネラルの摂取（せっしゅ）は、体の機能を助ける。
https://ja.wikibooks.org/wiki/小学校理科_6学年
から引用
シリツ医大卒のバカ医者は、
一次方程式で解けるカロリー計算ができないから中学理科すらできないと思っていたが、
小学校の理科すら履修できていないということだな。 >>813
術後カンファで経腸栄養にしようとか誰も指摘しないのか？
薬局からのフィードバックもかからのか？
三人寄れば文殊の知恵というが
ゼロはいくつ足してもゼロ。
まさにド底辺医のカンファがそれだな。 >>810
岡山で誇れるのか？www
で、東大がどうした？
バカだろおまえ救いようなし
死ねば？ 自分勝手で人間関係も築けず頭の悪い人は医療業務は無理ですよ まずは負荷のかからない軽作業から始めてみてはいかがでしょうか？ 医療の世界でいろいろと誤魔化したら 院内で大問題になります 解雇の対象です 人の命預かってますので その点で医療従事者としては不適格です ハローワーク行こうね >>818
いいんじゃね。地元の国立大学医学部に進学だから。
俺はお上りさん志向で上京したけど、旧二期校。
本日の暇つぶしはこれ、
案外、難しい。
正直者は嘘をつかないが、嘘つきはいつも嘘をつくとして
次の証言から嘘つきを特定せよ。
A：「Bは正直者だ」
B：「Cは嘘つきだ」
C：「Aは...」と語ったが質問者が述語を聞き取れずBが補足発言、
B：「Cは『Aは嘘つき』と言った」
次に、嘘つきは気まぐれで嘘も本当もいう場合に嘘つきの可能性の組み合わせを示せ。 >>820
>医療の世界でいろいろと誤魔化したら 院内で大問題になります
そのとおり、
んで、あんたどこ卒？
聖魔でいいの？ >>821
数を増やしたり、条件を変更しても答がでるようにプログラムするのは楽しいｗ．
大腸内視鏡が何分で終わったというのは、もう飽きた。 >>817
先ず、患者に自分がド底辺シリツ医大卒であることを告げる。
更に裏口入学であることも伝えれば正直者と認めてくれるかもしれん。
まずはそれからだ。
学会の講演でも講師の卒業大学から紹介が始まるだろ。
抗がん剤過剰投与されて亡くなった女子高校生の親の手記には
亡くなった本人は主治医が東大卒と誤認していたことが記されている。
んで、あんたどこ卒？ 真の論理力は、プログラミング技能で試されるといっても過言ではない。
論理的に完璧でなければプログラムは動かない代物だからだ。プログラムのバグが取り切れないうちは論理力などないに等しいと思った方がよい。
https://www.mag2.com/p/news/363603/2/ 👀
Rock54: Caution(BBR-MD5:7bff9ed63942b4cd01610d20b2c06e65) # 正直者は嘘をつかないが、嘘つきはいつも嘘をつくとして
# 次の証言から嘘つきを特定せよ。
# A「Bは正直者だ」
# B「Cは嘘つきだ」
# c「Aは...」と語ったが質問者が述語を聞き取れずBが補足発言、
# B「Cは『Aは嘘つき』と言った」
# 次に、嘘つきは気まぐれで嘘も本当もいう場合に嘘つきの可能性の組み合わせを示せ。
# all possible combination
dat=as.matrix(expand.grid(1:0,1:0,1:0)) # all possilbe combination
colnames(dat)=LETTERS[1:3]
# compatibility of honest answer
compati.H <- function(i,x){ # i index of honest, x: possible combination
switch(i, # i= 1,2,or,3
# if A is honest, B should be honest, compatible?
ans <- x[2]==1, # i=1 when A is honest
# if B is honest,C is a liar thereby A should be honest. compatible?
ans <- x[3]==0 & x[1]==1,# i=2 when B is honest
ans <- TRUE) # i=3, compatible due to no commitment by C
return(ans)
}
# compatibility of strict liar's answer
compati.L <- function(i,x){ # i index of liar, x: possible combination
switch(i,
ans <- x[2]==0, # i=1 when A is a strict liar
ans <- x[3]==1 & x[1]==1,# i=2 when B is a strict liar, A is honest whether B is honest or not
ans <- TRUE) # when i=3 compatible
return(ans)
} # check if combination x is compatible
check <- function(x,Strict){ # Strict==TRUE if liar always lies
re=NULL
honest <- which(x==1) # index of honest in x
for(i in honest){ # check if honest answer is compatible
re=append(re,compati.H(i,x))
}
if(Strict){
liar <- which(x==0) # index of liar in x
for(i in liar){ # check if the opposite of liars is compatible
re=append(re,compati.L(i,x))
}
}
all(re) # return TRUE only if all answer are compatible
}
dat[apply(dat,1,function(x) check(x,Strict=TRUE)),] # Strict liar
dat[apply(dat,1,function(x) check(x,Strict=FALSE)),] # fuzzy liar
# バグ指摘、コード改良 歓迎！ ハローワークで私の得意なことは論理力ですとでもいってみたら仕事くれるかもよwww >>831
>>807
こんなこと言われてるよ。
やっぱり、ド底辺シリツ医大卒なんだね。
底辺私立医大を卒業した医者って頭悪いよね？ Part10
https://egg.5ch.net/test/read.cgi/hosp/1537867846/801
801 名前：卵の名無しさん[] 投稿日：2018/12/06(木) 02:44:11.22 ID:nBMBFJg5
シリツ卒のあほはさっさと死ね！ >>830
>>817
先ず、患者に自分がド底辺シリツ医大卒であることを告げる。
更に裏口入学であることも伝えれば正直者と認めてくれるかもしれん。
まずはそれからだ。
学会の講演でも講師の卒業大学から紹介が始まるだろ。
抗がん剤過剰投与されて亡くなった女子高校生の親の手記には
亡くなった本人は主治医が東大卒と誤認していたことが記されている。
んで、あんたどこ卒？ >>830
論理も扱えない馬鹿でも入れる大学ってどこ？
あんた、どこ卒？
これであっているのか？
66 卵の名無しさん sage 2018/10/08(月) 09:22:57.88 ID:mQHuWxdH
ド底辺聖マ卒 頭悪すぎ
卒業大学も忘れるほど、認知症が進んでる？
いや、それ以前に知恵遅れ？？ 分かれ道があります
どちらかが天国行きでどちらかが地獄行きです
それぞれの分かれ道にいる門番に、
YES（はい）/NO（いいえ）で答えられる質問を
一度だけすることができます
門番はいつも本当のことを言う天使か、
いつもウソを言う悪魔のどちらかなのですが、
どちらなのかは見分けがつきません
どんな質問をすれば天国行きの道を知ることができますか >>835
>827もブール代数で解けるよ。
というよりブール代数の教科書の問題を無理やりプログラミングで解いた。
気まぐれ嘘つきは俺が追加してちょっぴり難問化した。 これが計算できるとdoor to baloonの時間短縮できる。
診療所から病院に患者を救急搬送する。
病院から医師搭乗の救急車が診療所に向かっており１０時到着予定と連絡が入った。
患者の病態が悪化したら、診療所の普通車で病院に向かい救急車と出会ったら
救急車に患者を移して搬送し病院到着を急ぐという計画を立てた。
普通車から救急車への患者の乗り換えで１０分余分に時間がかかる。
道路事情から救急車は病院から診療所への道は
平均時速６０ｋｍで、逆方向は平均時速４５ｋｍで定速走行する。診療所の普通車は信号待ちもあり平均時速３０kmで定速走行する。
何時以降の病態悪化は診療所の車を使わずに救急車の到着を待つ方が病院に早く着くか？ It is common knowledge among doctors and patients that Do-Teihen(exclusively bottom-leveled medical school) graduates mean morons who bought their way to Gachi'Ura(currently called by themselves)
According to the experience of entrance exam to medical school in the era of Showa, when the sense of discrimination against
privately-founded medical schools were more intense than it is now,
all such schools but for Keio had been so compared to some specialized institution for educable mentally retarded kids that nobody but imbecile successors of physicians in private practice had applied for admission.
There had been NOT a single classmate who chose willingly against his/her common sense to go to the Do-Teihen(exclusively bottom-leveled medical school, currently also known as Gachi'Ura),
which would have cost outrageous money and its graduates are destined to be called Uraguchi morons who bought thier way into the Do-Teihen, by thier colleagues and even by thier own clients.
Although people won't call them names to their face,
certain 80-90% people of about my age have been yet scorning and sneering at Uraguchi graduates, speaking in the back of our mind,
" Uraguchi morons shall not behave like somebody."
We never speak out face to face in real life. >>841
>>831
>>807
こんなこと言われてるよ。
やっぱり、ド底辺シリツ医大卒なんだね。
底辺私立医大を卒業した医者って頭悪いよね？ Part10
https://egg.5ch.net/test/read.cgi/hosp/1537867846/801
801 名前：卵の名無しさん[] 投稿日：2018/12/06(木) 02:44:11.22 ID:nBMBFJg5
シリツ卒のあほはさっさと死ね！ 宮廷卒、ド底辺シリツ卒、駅弁卒の３人がいる。
宮廷は常に真実を語り、
ド底辺シリツ卒は常に嘘をつく、
駅弁卒は気まぐれで真実も嘘も返す。
いずれも他人の卒業大学は知らない。
YESかNoで答えられる質問（複数回してもよい）をして３人に答えてもらう。
ド底辺シリツ医卒を避けるにはどうすればよいか？ It is common knowledge among doctors and patients that Do-Teihen(exclusively bottom-leveled medical school) graduates mean morons who bought their way to Gachi'Ura(currently called by themselves)
According to the experience of entrance exam to medical school in the era of Showa, when the sense of discrimination against
privately-founded medical schools were more intense than it is now,
all such schools but for Keio had been so compared to some specialized institution for educable mentally retarded kids that nobody but imbecile successors of physicians in private practice had applied for admission.
There had been NOT a single classmate who chose willingly against his/her common sense to go to the Do-Teihen(exclusively bottom-leveled medical school, currently also known as Gachi'Ura),
which would have cost outrageous money and its graduates are destined to be called Uraguchi morons who bought thier way into the Do-Teihen, by thier colleagues and even by thier own clients.
Although people won't call them names to their face,
certain 80-90% people of about my age have been yet scorning and sneering at Uraguchi graduates, speaking in the back of our mind,
" Uraguchi morons shall not behave like somebody."
We never speak out face to face in real life. It is common knowledge among doctors and patients that Do-Teihen(exclusively bottom-leveled medical school) graduates mean morons who bought their way to Gachi'Ura(currently called by themselves)
According to the experience of entrance exam to medical school in the era of Showa, when the sense of discrimination against
privately-founded medical schools were more intense than it is now,
all such schools but for Keio had been so compared to some specialized institution for educable mentally retarded kids that nobody but imbecile successors of physicians in private practice had applied for admission.
There had been NOT a single classmate who chose willingly against his/her common sense to go to the Do-Teihen(exclusively bottom-leveled medical school, currently also known as Gachi'Ura),
which would have cost outrageous money and its graduates are destined to be called Uraguchi morons who bought thier way into the Do-Teihen, by thier colleagues and even by thier own clients.
Although people won't call them names to their face,
certain 80-90% people of about my age have been yet scorning and sneering at Uraguchi graduates, speaking in the back of our mind,
" Uraguchi morons shall not behave like somebody."
We never speak out face to face in real life. >>846
>>830
論理も扱えない馬鹿でも入れる大学ってどこ？
あんた、どこ卒？
これであっているのか？
66 卵の名無しさん sage 2018/10/08(月) 09:22:57.88 ID:mQHuWxdH
ド底辺聖マ卒 頭悪すぎ
卒業大学も忘れるほど、認知症が進んでる？
いや、それ以前に知恵遅れ？？ 開業医スレに書いた暇つぶしネタ
簡単過ぎて暇つぶしにもならなかったようだ。
医師A,B,Cがいて
真実医、裏口医、一般医からなる、
各属性の医師が一人ずついる、
は分かっているが誰がどれに属するかは不明である。
A,B,Cはお互いの属性は知っている。
真実医は常に真実を語り、
裏口医は常に嘘をつき
一般医は真実も嘘も返す。
３人にYESかNOで答えられる同じ質問をして裏口医を同定したい。質問は２問まですることができる。
どういう質問をすればよいか。 どしろーとwww 血糖コントロールもできないなんて 偽医者www これは名言だね。
「医者とか弁護士よりも、東大の方が上なんですよ、資格として」
http://news.livedoor.com/article/detail/15707956/
まったくその通り！
シリツって恥ずかしいよね。
by 東大理科一類→同工学部→九大医学部 これからも何年も偽医者を演じるんだね まずは自分の足元からどうすれば良いのか考えた方がいいよw 1人でする仕事はあるよ 清掃業とか新聞配達とかいろいろある 月に10万ももらえればいいじゃないかw It is common knowledge among doctors and patients that Do-Teihen(exclusively bottom-leveled medical school) graduates mean morons who bought their way to Gachi'Ura(currently called by themselves)
According to the experience of entrance exam to medical school in the era of Showa, when the sense of discrimination against
privately-founded medical schools were more intense than it is now,
all such schools but for Keio had been so compared to some specialized institution for educable mentally retarded kids that nobody but imbecile successors of physicians in private practice had applied for admission.
There had been NOT a single classmate who chose willingly against his/her common sense to go to the Do-Teihen(exclusively bottom-leveled medical school, currently also known as Gachi'Ura),
which would have cost outrageous money and its graduates are destined to be called Uraguchi morons who bought thier way into the Do-Teihen, by thier colleagues and even by thier own clients.
Although people won't call them names to their face,
certain 80-90% people of about my age have been yet scorning and sneering at Uraguchi graduates, speaking in the back of our mind,
" Uraguchi morons shall not behave like somebody."
We never speak out face to face in real life. >>858
>849もわからない論理力？
ド底辺シリツ医大に裏口入学確定じゃね。
>>846
>>830
論理も扱えない馬鹿でも入れる大学ってどこ？
あんた、どこ卒？
これであっているのか？
66 卵の名無しさん sage 2018/10/08(月) 09:22:57.88 ID:mQHuWxdH
ド底辺聖マ卒 頭悪すぎ
卒業大学も忘れるほど、認知症が進んでる？
いや、それ以前に知恵遅れ？？ >>855
やはり国立の人は出身校を名乗れるよね。
俺、二期校時代の医科歯科入学。 >>855
シリツが恥ずかしいのは本人も自覚しているから日本国民の共通認識だよね。 >>854
>>830
>>817
カリウム補充する前に
患者に自分がド底辺シリツ医大卒であることを告げろよ！
隠すのは患者の期待権の侵害だぞ！！
更に裏口入学であることも伝えれば正直者と認めてくれるかもしれん。
まずはそれからだ。
学会の講演でも講師の卒業大学から紹介が始まるだろ。
抗がん剤過剰投与されて亡くなった女子高校生の親の手記には
亡くなった本人は主治医が東大卒と誤認していたことが記されている。
んで、あんたどこ卒？ >>858
>849もわからない論理力？
ド底辺シリツ医大に裏口入学確定じゃね。
>>846
>>830
論理も扱えない馬鹿でも入れる大学ってどこ？
あんた、どこ卒？
これであっているのか？
66 卵の名無しさん sage 2018/10/08(月) 09:22:57.88 ID:mQHuWxdH
ド底辺聖マ卒 頭悪すぎ
卒業大学も忘れるほど、認知症が進んでる？
いや、それ以前に知恵遅れ？？ >>866
患者に自分がド底辺シリツ医大卒であることを告げたか？
隠すのは患者の期待権の侵害だぞ！！
更に裏口入学であることも伝えれば正直者と認めてくれるかもしれん。
まずはそれからだ。
学会の講演でも講師の卒業大学から紹介が始まるだろ。
抗がん剤過剰投与されて亡くなった女子高校生の親の手記には
亡くなった本人は主治医が東大卒と誤認していたことが記されている。
んで、あんたどこ卒？ >>866
カリウム補充に想到できないとはさすがド底辺シリツ医ｗ
あんた、どこ卒？
これであっているのか？
66 卵の名無しさん sage 2018/10/08(月) 09:22:57.88 ID:mQHuWxdH
ド底辺聖マ卒 頭悪すぎ
卒業大学も忘れるほど、認知症が進んでる？
いや、それ以前に知恵遅れ？？ >>868
>>870
>>866
患者に自分がド底辺シリツ医大卒であることを告げたか？
隠すのは患者の期待権の侵害だぞ！！
更に裏口入学であることも伝えれば正直者と認めてくれるかもしれん。
まずはそれからだ。
学会の講演でも講師の卒業大学から紹介が始まるだろ。
抗がん剤過剰投与されて亡くなった女子高校生の親の手記には
亡くなった本人は主治医が東大卒と誤認していたことが記されている。
んで、あんたどこ卒？ >>870
シリツだと恥ずかしい？
母校に誇りがないのは裏口だからだよね？ シリツ医の使命は裏口入学撲滅国民運動の先頭に立つことだよ。
裏口入学の学生を除籍処分にしないかぎり、信頼の回復はないね。つまり、いつまで経ってもシリツ医大卒＝裏口バカと汚名は拭えない。シリツ出身者こそ、裏口入学に厳しい処分せよを訴えるべき。
裏口入学医師の免許剥奪を！の国民運動の先頭に立てばよいぞ。
僕も裏口入学とか、言ってたら信頼の回復はない。 インスリン単発注射でカリウム補充することは普通しないぞい どしろーとwww 血圧が200になった どうしよう？すぐ下げたいんだが？ >>877
患者に自分がド底辺シリツ医大卒であることを告げたか？
隠すのは患者の期待権の侵害だぞ！！
更に裏口入学であることも伝えれば正直者と認めてくれるかもしれん。
まずはそれからだ。
学会の講演でも講師の卒業大学から紹介が始まるだろ。
抗がん剤過剰投与されて亡くなった女子高校生の親の手記には
亡くなった本人は主治医が東大卒と誤認していたことが記されている。
んで、あんたどこ卒？ >>876
>>841
>>831
>>807
こんなこと言われてるよ。
患者からも言われるかもよ。
やっぱり、ド底辺シリツ医大卒なんだね。
底辺私立医大を卒業した医者って頭悪いよね？ Part10
https://egg.5ch.net/test/read.cgi/hosp/1537867846/801
801 名前：卵の名無しさん[] 投稿日：2018/12/06(木) 02:44:11.22 ID:nBMBFJg5
シリツ卒のあほはさっさと死ね！ 採血したいのだが検査項目はどうしようかな？胸写上は問題なし >>880
>>876
>>841
>>831
>>807
こんなこと言われてるよ。
患者からも言われるかもよ。
やっぱり、ド底辺シリツ医大卒なんだね。
底辺私立医大を卒業した医者って頭悪いよね？ Part10
https://egg.5ch.net/test/read.cgi/hosp/1537867846/801
801 名前：卵の名無しさん[] 投稿日：2018/12/06(木) 02:44:11.22 ID:nBMBFJg5
シリツ卒のあほはさっさと死ね！ >>880
採血以前にする前に患者との信頼関係を築かなくっちゃ。
患者に自分がド底辺シリツ医大卒であることを告げろよ！
隠すのは患者の期待権の侵害だぞ！！
更に裏口入学であることも伝えれば正直者と認めてくれるかもしれん。
まずはそれからだ。
学会の講演でも講師の卒業大学から紹介が始まるだろ。
抗がん剤過剰投与されて亡くなった女子高校生の親の手記には
亡くなった本人は主治医が東大卒と誤認していたことが記されている。
んで、あんたどこ卒？ >>880
あんた、どこ卒？
これであっているのか？
66 卵の名無しさん sage 2018/10/08(月) 09:22:57.88 ID:mQHuWxdH
ド底辺聖マ卒 頭悪すぎ とりあえず脈下げてやらんといかんからあれいこう 血圧はあの降圧剤使おう おじさんわかる？ 解熱したのに脈が速い あれいこうかな？おじさんわかる？ >>884
卒業大学を誤魔化したら駄目だぞ。
検尿以前にする前に患者との信頼関係を築かなくっちゃ。
患者に自分がド底辺シリツ医大卒であることを告げろよ！
隠すのは患者の期待権の侵害だぞ！！
更に裏口入学であることも伝えれば正直者と認めてくれるかもしれん。
まずはそれからだ。
学会の講演でも講師の卒業大学から紹介が始まるだろ。
抗がん剤過剰投与されて亡くなった女子高校生の親の手記には
亡くなった本人は主治医が東大卒と誤認していたことが記されている。
んで、あんたどこ卒？ >>889
>>880
>>876
>>841
>>831
>>807
こんなこと言われてるよ。
患者からも言われるかもよ。
やっぱり、ド底辺シリツ医大卒なんだね。
底辺私立医大を卒業した医者って頭悪いよね？ Part10
https://egg.5ch.net/test/read.cgi/hosp/1537867846/801
801 名前：卵の名無しさん[] 投稿日：2018/12/06(木) 02:44:11.22 ID:nBMBFJg5
シリツ卒のあほはさっさと死ね！ おじさん偽医者であることはわかったからもっとみんなを笑わせることを考えろなw
そして月曜日はハローワーク行って僕は論理力がありますと言えばなんか仕事もらえるかもよw >>892
んで、あんたどこ卒？
恥ずかしくて言えないところ？
やっぱり、裏口入学？？ >>884
ド底辺シリツ医大学進学こそが誤魔化し人生だろ。
こんなこと言われてるよ。
患者からも言われるかもよ。
やっぱり、ド底辺シリツ医大卒なんだね。
底辺私立医大を卒業した医者って頭悪いよね？ Part10
https://egg.5ch.net/test/read.cgi/hosp/1537867846/801
801 名前：卵の名無しさん[] 投稿日：2018/12/06(木) 02:44:11.22 ID:nBMBFJg5
シリツ卒のあほはさっさと死ね！ >>892
>>734
これに同意できるだろ？
シリツ医の使命は裏口入学撲滅国民運動の先頭に立つことだよ。
裏口入学の学生を除籍処分にしないかぎり、信頼の回復はないね。つまり、いつまで経ってもシリツ医大卒＝裏口バカと汚名は拭えない。シリツ出身者こそ、裏口入学に厳しい処分せよを訴えるべき。
裏口入学医師の免許剥奪を！の国民運動の先頭に立てばよいぞ。
僕も裏口入学とか、言ってたら信頼の回復はない。 >>849
開業医スレに正解の投稿があったな。
当然、国立卒だろうな。
ド底辺シリツ医は論理的思考能力すら欠いているから。 待ち時間行列の問題。
再来患者は過去の診察に要した平均時間が記録されているとする。ひとりの診察が終わった時点で待っている患者を過去の診察時間が短い順に診察するという方針を採ったら
平均待ち時間がどれだけ短縮するか？
このシミュレーションプログラムを作りたい。
週末はこれで暇つぶししよう。 順番に診察する場合の待ち時間と待ち人数のシミュレーションは
既に完成している。
来院数がポアソン分布（来院間隔は指数分布）、
診療時間はそれまでの患者の診療時間に影響されない（マルコフ性とか無記憶性と呼ばれる）ので指数分布
と仮定して、１時間に５人受診、診療時間は１０分を平均値として受診数を４０人としてシミュレーションすると
https://i.imgur.com/2HSJiRL.png
https://i.imgur.com/aG4ySWl.png >>899
ド底辺シリツ医大卒よりブザマな経歴が医療の世界にあるだろうか？ >>901
>>880
あんた、どこ卒？
これであっているのか？
66 卵の名無しさん sage 2018/10/08(月) 09:22:57.88 ID:mQHuWxdH
ド底辺聖マ卒 頭悪すぎ liars <- function(Answer,Strict=TRUE){ # duplicate answer and/or case of all liars permitted
N=length(Answer)
arg=list()
for(i in 1:N) arg[[i]]=0:1
dat=do.call(expand.grid,arg) # expand.grid(0:1,0:1,0:1,...,0:1)
colnames(dat)=LETTERS[1:N]
check <- function(y,answer=Answer){
if(all(y==1)) {!all(1:N %in% answer)}
else{ # Strict: all honest answer compatible & not included in liar's anwer
if(Strict){all(answer[y==0]==sum(y)) & !(sum(y) %in% answer[y==1])}
else {all(answer[y==0]==sum(y))}
}
}
dat[apply(dat,1,check),]
}
liars(Answer<-sample(10,10,rep=T),S=F) ; Answer
liars(c(1, 2, 3, 4, 5, 5, 5, 5, 9, 9, 9),Strict=FALSE)
liars(c(1, 2, 3, 4, 5, 5, 5, 5, 9, 9, 9),Strict=TRUE) >>863
隠す理由ないし。
学ぶことができてよかったと心から思ってるし。 カっこいいなぁ！素晴らしい論理力www ハローワークでは引っ張りだこだな よかったね！www >>897
ようやく完成。
# serve first the client in que whose service time is shortest
n=40
la=5/60 # arrival rate
mu=6/60 # service rate
set.seed(1234) ; aint=rexp(n,la) # arrival interval
act=cumsum(aint) # arrival clock time
set.seed(5678) ; ds=rexp(n,mu) # service time for i-th patient (duration of service)
Wq=numeric(n) # Wq[i] : Wating time in que of i-th patient
sect=numeric(n) # sect[j] : service end clock time of j-th service (not i-th patient)
act=round(act) ; ds=round(ds) # round up for convenience
"
> act # arrival clock time
[1] 30 33 33 54 59 60 70 72 82 91 114 133 153 189 210 211 221 222
[19] 244 250 274 282 287 298 301 313 313 318 327 338 343 343 363 363 372 373
[37] 425 436 436 477
> ds # service time
[1] 12 10 14 27 18 11 15 1 8 4 2 10 1 11 25 14 3 33 37 22 9 19 6 0 2
[26] 14 25 21 2 10 2 3 13 1 5 4 12 19 8 12
"
# initialize
Wq=ssct=sect=rep(NA,n)
Wq[1]=0 # no waiting time with 1st patient
ssct[1]=act[1] # service start time for 1st patient
sect[1]=act[1]+ds[1] # service end clock time for 1st patient
served=1 # index of already served patient for(i in 1:(n-1)){
Q = which(act < sect[i])[-served] # Que: arrival earlier than previous service end
if (length(Q)==0) { # if none in Que
served=append(served,i+1) # i+1 th patient gets service
Wq[i+1]=0 # with no waiting in que
sect[i+1]=sect[i]+ds[i+1] # service end clock time
}else{
que=which(act < sect[i])[-served] # patient index in que
que ; ds[que] # just for reference
min.p=que[which.min(ds[que])] # min.p patient in que needs shortest service time
act[min.p] # arrival time of the shortest patient
sect[i] # i-th service end clock time, not for i-th patient
served=append(served,min.p) # patient with mimimum service time served earlier
Wq[min.p]=sect[i]-act[min.p] # save in Wq at patient index
sect[i+1]=sect[i]+ds[min.p] # save in sect at time order
}
}
hist(Wq,col='lightblue',breaks=20,main='')
served
Wq
mean(Wq)
W=Wq+ds
mean(W)
ssct=sect-ds[served] L=Lq=NA
ct2Lq <- function(ct){ # ct:clock time to Lq
sum(act<ct & ct<ssct)
}
Lq=mean(sapply(seq(0,max(ssct),len=1e4),ct2Lq)) # average clients in que
ct2L <- function(ct){ # ct:clock time to Lq
sum(act<ct & ct<sect)
}
L=mean(sapply(seq(0,max(ssct),len=1e4),ct2L)) # average clients in que
cat("Lq = ",Lq,'\n',"summary of Waiting in que \n")
print(summary(Wq))
cat("L = ",L,'\n',"summary of total time since arrival \n")
print(summary(W))
par(mfrow=c(2,2))
hist(Wq,freq=TRUE,col="lightblue",main="Waiting time in que")
hist(W, freq=TRUE,col="lightgreen",main="Total time since arrival")
plot(sect,1:n,type='n',bty='l',ylab="client",xlab='clock time',
main=paste('average waiting time :',round(mean(Wq),2)))
segments(y0=1:n,x0=act,x1=ssct,col='gray')
points(act,1:n,pch=1)
points(ssct,1:n,pch=19)
points(sect,1:n,pch=3,cex=0.6)
legend('bottomright',bty='n',legend = c('arrival','service start','service end'),pch=c(1,19,3))
ct=seq(0,max(ssct),len=1e4)
plot(ct,sapply(ct,ct2Lq),xlab="clock time",ylab="",main="clients in que",
type='s',bty='l')
par(mfrow=c(1,1)) 素晴らしい論理力です！www ハローワーク行ったら是非ここで働いてください！人間関係はあまりありませんから是非！ところで履歴書は提出していただけませんか？相当な履歴なのでしょう！月六万円の報酬ですが頑張ってみませんか？と言われますwww Lq = 4.4541
summary of Waiting in que
Min. 1st Qu. Median Mean 3rd Qu. Max.
0.0 29.5 56.0 57.8 82.0 113.0
[1] 0 9 19 12 34 51 52 65 56 55 36 19 9 0 0 24
[17] 28 30 41 72 70 71 85 80 77 67 81 101 113 104 109 111
[33] 94 107 99 103 55 56 75 42
から
Lq = 1.5235
> summary(Wq)
Min. 1st Qu. Median Mean 3rd Qu. Max.
0.0 4.5 9.0 18.4 19.0 147.0
> Wq
[1] 0 9 19 71 46 6 8 5 15 2 9 19 9 0 0 0
[17] 0 0 5 147 12 19 8 3 19 9 106 20 9 27 16 18
[33] 21 1 7 2 27 28 8 6
に待ち時間が大幅に改善できた。 診察順序は
> served
[1] 1 2 3 6 8 7 10 9 5 11 4 12 13 14 15 16 17 18 19 21 23
[22] 24 22 25 26 29 28 31 32 34 30 36 35 33 20 27 39 37 38 40
First Come First Servedの原則は外すが
平均の待ち時間57.8分が18.4分に改善できた。
シミュレーションはデバッグが大変だったが、一応の完成を見た。 ド底辺シリツ医大卒は GIGOな。
Garbage In, Garbage Out. プログラミング過程では再現性の確保にseed設定して乱数発生させたが、
ランダムに乱数発生させてどうなるかの検証は明日にしよう。
待ち行列の勉強をするつもりが、嘘つきパズルにハマって回り道してしまった。
プログラミングって論理的思考のよいトレーニングになる。
言語の仕様を理解できていないと、なかなかバグに気づかないな。 >>915
患者との信頼関係を築かなくっちゃ。
患者に自分がド底辺シリツ医大卒であることを告げろよ！
隠すのは患者の期待権の侵害だぞ！！
更に裏口入学であることも伝えれば正直者と認めてくれるかもしれん。
まずはそれからだ。
学会の講演でも講師の卒業大学から紹介が始まるだろ。
抗がん剤過剰投与されて亡くなった女子高校生の親の手記には
亡くなった本人は主治医が東大卒と誤認していたことが記されている。
んで、あんたどこ卒？ 真の論理力は、プログラミング技能で試されるといっても過言ではない。
論理的に完璧でなければプログラムは動かない代物だからだ。プログラムのバグが取り切れないうちは論理力などないに等しいと思った方がよい。 >>914
オスラー病を鑑別に入れておけよ。
それより前にすることはこれな。
患者に自分がド底辺シリツ医大卒であることを告げろよ！
隠すのは患者の期待権の侵害だぞ！！
更に裏口入学であることも伝えれば正直者と認めてくれるかもしれん。
まずはそれからだ。
学会の講演でも講師の卒業大学から紹介が始まるだろ。
抗がん剤過剰投与されて亡くなった女子高校生の親の手記には
亡くなった本人は主治医が東大卒と誤認していたことが記されている。
んで、あんたどこ卒？ 馬鹿者 転倒して顔打ったんだよwで、どういう処置をするのかな？ あれやったら出血止まった さてどんな処置をしたのでしょう？ 医学部医学科限定 大学難易度ランキング（国立・公立・私立) 最新格付け 2019
SSS 東京大/理3
SS 京都大
S 大阪大 東京医歯大 慶應大
------超一流医学部の壁------
A 名古屋大 九州大 東北大 千葉大
B 北海道大 神戸大 広島大 京都府立医大 大阪市立大 横浜市立大 ★東大理1
------旧帝医大の壁------
C 筑波大 岡山大 金沢大 奈良県立医大 名古屋市立大 東京慈恵医大 ★東大理2
------東大の壁-------
D 浜松医大 熊本大 新潟大 長崎大 山梨医大 順天堂大 大阪医大 自治医大 防衛医大
------旧6医大の壁-----
E 岐阜大 滋賀医大 関西医大
----------京大農学部の壁----------
F 札幌医大 弘前大 山形大 和歌山県立医大 信州大 群馬大 香川大 山口大 徳島大 愛媛大 高知大 富山大 三重大 鹿児島大 大分大 宮崎大 日本医大 昭和大 近畿大 東京医大
G 旭川医大 秋田大 島根大 佐賀大 琉球大 福島県立医大 鳥取大 福井大 日本大 杏林大 東京女子医大 久留米大 産業医大 東邦大
H 北里大 愛知医大 藤田保健衛生大 金沢医大 兵庫医大 福岡大
I 岩手医大 獨協医大 埼玉医大 聖マリアンナ医大 川崎医大
----------早慶理工の壁----------
J 東海大
K 帝京大
https://医学部予備校.com/?p=202
まあ大体こんな感じっしょ >>929
そういう不正を思いつくのがシリツ医大卒だな。
裏口入学なんだろうね。
今の内視鏡バイトはm3の斡旋。 >>926
問題作成能力もないのがド底辺シリツ医。
外来にもいるよな、問診しても単語しか答えられない知恵遅れが！ >>930
患者に自分がド底辺シリツ医大卒であることを告げろよ！
隠すのは患者の期待権の侵害だぞ！！
更に裏口入学であることも伝えれば正直者と認めてくれるかもしれん。
まずはそれからだ。
学会の講演でも講師の卒業大学から紹介が始まるだろ。
抗がん剤過剰投与されて亡くなった女子高校生の親の手記には
亡くなった本人は主治医が東大卒と誤認していたことが記されている。
んで、あんたどこ卒？ >>922
First come, first servedではないが
long wait, long serviceなので一概に不公平とも言えないな。 論理推論もできないド底辺シリツ医大卒裏口バカを後回しにすると全体の待ち時間が減って幸せになれる。 >>909
スクリプトにポアソン分布であることはどこにも使ってないから
どんな分布をしてもシミュレーション計算できるな。 >>904
ほんと、卒業大学を隠す理由なんてないよね。 >>930
オイ、ド底辺！
宮廷卒の方がが
卒業大学を隠す理由がないと仰せだぞ。
んで、あんたどこ卒よ。 >>917
> late =which(served>1:n)
> length(late)
[1] 19
> longer=(Wq0-Wq1)[late] # how much longer
> longer ; summary(longer)
[1] 59 12 -45 -44 -60 -53 75 -58 -52 -77 -58 -58 25
[14] -81 -104 -77 -93 -73 -28
Min. 1st Qu. Median Mean 3rd Qu. Max.
-104.00 -75.00 -58.00 -41.58 -36.00 75.00
> sort(longer)
[1] -104 -93 -81 -77 -77 -73 -60 -58 -58 -58 -53 -52 -45
[14] -44 -28 12 25 59 75
> sum(longer<0)
[1] 15
４０人中１９人が先着順より順番が遅れるが、うち、１５人は先着順のときより待ち時間が少ない。
平均して42分の短縮
待ち時間が長くなった4人の延長した待ち時間は12 25 59 75 >>943
伸びた人の内訳 ： 先着順、最短順、その差
> Wq1[late[longer>0]] ; Wq0[late[longer>0]]
[1] 12 34 72 81
[1] 71 46 147 106
> Wq0[late[longer>0]]-Wq1[late[longer>0]]
[1] 59 12 75 25
40人中4人が待ち時間では不利益を被るが、
診療時間は
> ds[late[longer>0]]
[1] 27 18 22 25
で
全体の平均11.6分よりも長い。
> summary(ds)
Min. 1st Qu. Median Mean 3rd Qu. Max.
0.00 3.75 10.50 11.62 15.75 37.00 論理力に乏しい、つまり、バカは後回しにするのが全体の幸福に寄与する。 診察順が繰り上がった9人は全員、待ち時間が短縮
> earlier ; summary(earlier)
[1] -41 -27 -77 -93 -106 -92 -101 -28 -67
Min. 1st Qu. Median Mean 3rd Qu. Max.
-106.00 -93.00 -77.00 -70.22 -41.00 -27.00 served
late =which(served>1:n) ; late
length(late)
Wq0[late]
longer=(Wq0-Wq1)[late] # how much longer
longer ; summary(longer)
sort(longer)
sum(longer<0)
Wq1[late[longer>0]] ; Wq0[late[longer>0]]
Wq0[late[longer>0]]-Wq1[late[longer>0]]
summary(ds)
ds[late[longer>0]]
early=which(served<1:n)
length(early)
earlier=(Wq0-Wq1)[early] # how much earlier
earlier ; summary(earlier)
sum(earlier<0) >>922
グラフの下の段の比較から待ち行列の長さも
先着順ので最長１２人から最短順で最長５まで短縮できている。 >>941
私立卒がなぜ卒業校の名前を隠すのか？
それは恥ずかしくて言えないからだろ。
それ以外に理由はないと思うが。
東京医大の件でも分かったように私立なんてゴミ。
医者になるなら最低でも地方国立にいくべき。 ハローワーク明日いこうね 得意の論理力でねwww月3万でいいやんwww 鼻出血の処置教えて欲しいなぁw 医者なんだろ？おじさんよwww >>951
ゴミだってさ。
んで、あんたどこのゴミ医大卒？ 偽医者のルサンチマンほどみっともないことはないねぇwww 80歳で便が出なくて苦しい患者がいる どうしようかな？ 問題作成能力もないのがド底辺シリツ医。
外来にもいるよな、問診しても単語しか答えられない知恵遅れ。 え！便秘の処置も知らないの？www おじさんハローワーク ハローワークwww明日いこうねww明日 >>956
>>930
オイ、ド底辺！
宮廷卒の方が
卒業大学を隠す理由がないと仰せだぞ。
んで、あんたどこ卒よ。 >>954
まず、患者に自分がド底辺シリツ医大卒であることを告げる。
隠すのは患者の期待権の侵害だぞ！！
更に裏口入学であることも伝えれば正直者と認めてくれるかもしれん。
まずはそれからだ。
学会の講演でも講師の卒業大学から紹介が始まるだろ。
抗がん剤過剰投与されて亡くなった女子高校生の親の手記には
亡くなった本人は主治医が東大卒と誤認していたことが記されている。
んで、あんたどこ卒？ >>953
ド底辺シリツ医大卒より恥ずかしいことはない。
その証拠にオマエがどこ卒かすら言えない。 >>959
ド底辺シリツなら直腸診もせずに浣腸しそうだな。
んで、あんたどこ卒？ >>959
直腸の前に患者との信頼関係を築かなくっちゃ。
患者に自分がド底辺シリツ医大卒であることを告げろよ！
隠すのは患者の期待権の侵害だぞ！！
更に裏口入学であることも伝えれば正直者と認めてくれるかもしれん。
まずはそれからだ。
学会の講演でも講師の卒業大学から紹介が始まるだろ。
抗がん剤過剰投与されて亡くなった女子高校生の親の手記には
亡くなった本人は主治医が東大卒と誤認していたことが記されている。
んで、あんたどこ卒？ わーいっぱい便出たな 見てるこっちも気持ちが良い グリ浣ってどんな種類あるか知ってる？ >>953
ド底辺シリツ医大卒より恥ずかしいことはない。
その証拠にオマエがどこ卒かすら言えない。 >>966
患者に自分がド底辺シリツ医大卒であることを告げた？
隠すのは患者の期待権の侵害だぞ！！
更に裏口入学であることも伝えれば正直者と認めてくれるかもしれん。
まずはそれからだ。
学会の講演でも講師の卒業大学から紹介が始まるだろ。
抗がん剤過剰投与されて亡くなった女子高校生の親の手記には
亡くなった本人は主治医が東大卒と誤認していたことが記されている。
んで、あんたどこ卒？ >>966
ド底辺シリツ医大の裏口バカに身体に触れられたくない患者っていると思うだろ？
アメリカ帰りが黄色人種は白人の大腸内視鏡はさせてもらえないとかいってたな。 偽医者おじさんよ うちの医局の掃除をよ そうだなおじさんなら月一万で雇ってやるぞwww 現代の不可触民がド底辺シリツ医大の裏口バカである。 ナマポからも避けられる。
ナマポの症例報告です。
実例↓
517 卵の名無しさん 2018/02/25(日) 11:36:00.56 ID:gq76tAvs
福岡のあの歯科大かな？
歯科口腔外科で抜歯依頼したら爺ちゃんが〇〇歯科大卒の先生は避けて下さいねがあった
けど。
この爺ちゃん、聖マリ卒の先生もよけて下さいと初診時に言ってた札付き爺さん。
生保受給者のくせにね。 東大卒の才媛もこう語っているよ。
大きな声で職場での読み上げろよ！
毎朝朝礼で唱えるといいんじゃね？
今日は寝る前に暗唱しておけよ！
http://ishikisoku.com/wp-content/uploads/2016/12/SQIR26V.jpg >>971
どこの医局？
ド底辺シリツ医大のブラックジッツ？ これに同意できるだろ？
シリツ医の使命は裏口入学撲滅国民運動の先頭に立つことだよ。
裏口入学の学生を除籍処分にしないかぎり、信頼の回復はないね。つまり、いつまで経ってもシリツ医大卒＝裏口バカと汚名は拭えない。シリツ出身者こそ、裏口入学に厳しい処分せよを訴えるべき。
裏口入学医師の免許剥奪を！の国民運動の先頭に立てばよいぞ。
僕も裏口入学とか、言ってたら信頼の回復はない。 やばい うどん食って誤嚥した 窒息だー さあどうする？偽医者おじさんよw やれやれ。
卒業校を名乗ればそれだけで済むのに。
たった一行書くだけだぞ。
俺は東大理科一類→同工学部→九大医学部
な、簡単だろ？
たったの一行。 ある処置をして窒息防いだよん 何をしたでしょうか？おじさんよ？www 俺の知り合いの新聞販売所で職員募集してるぞ 還暦近いおじさんには酷だが新聞配達でもやらない？月五万だけどねwwwww 仕事内容は 配達 集金 営業だよ 人間関係ないから心配しなくていいぞwww集金と営業は頭下げなきゃいけないけどな おじさんにはできる！頑張ってください！www ド底辺シリツ医大卒という屈辱が嫌なら国立再受験すればいいのに。
まぁ、そんな学力があればド底辺シリツ医大なんぞ選択しないよな。
現在も通用する、不朽の名投稿によると８ー９割の多数意見らしいな。
(quote)
私は昭和の時代に大学受験したけど、昔は今よりも差別感が凄く、慶応以外の私立医は特殊民のための特殊学校というイメージで開業医のバカ息子以外は誰も受験しようとすらしなかった。
常識的に考えて、数千万という法外な金を払って、しかも同業者からも患者からもバカだの裏口だのと散々罵られるのをわかって好き好んで私立医に行く同級生は一人もいませんでした。
本人には面と向かっては言わないけれど、俺くらいの年代の人間は、おそらくは８－９割は私立卒を今でも「何偉そうなこと抜かしてるんだ、この裏口バカが」と心の底で軽蔑し、嘲笑しているよ。当の本人には面と向かっては絶対にそんなことは言わないけどね。
(unquote) 医科歯科卒ですか 素晴らしいです 論理力もすごいし よほどの名医なのですな ところで明日はハローワーク行くのですか？得意の論理力でいい仕事がゲットできたらいいですねwwwでも新聞配達とかが向いてると思いますがねぇwww月に五万は稼げますよwww It is common knowledge among doctors and patients that Do-Teihen(exclusively bottom-leveled medical school) graduates mean morons who bought their way to Gachi'Ura(currently called by themselves)
According to the experience of entrance exam to medical school in the era of Showa, when the sense of discrimination against
privately-founded medical schools were more intense than it is now,
all such schools but for Keio had been so compared to some specialized institution for educable mentally retarded kids that nobody but imbecile successors of physicians in private practice had applied for admission.
There had been NOT a single classmate who chose willingly against his/her common sense to go to the Do-Teihen(exclusively bottom-leveled medical school, currently also known as Gachi'Ura),
which would have cost outrageous money and its graduates are destined to be called Uraguchi morons who bought thier way into the Do-Teihen, by thier colleagues and even by thier own clients.
Although people won't call them names to their face,
certain 80-90% people of about my age have been yet scorning and sneering at Uraguchi graduates, speaking in the back of our mind,
" Uraguchi morons shall not behave like somebody."
We never speak out face to face in real life. これに同意できるだろ？
シリツ医の使命は裏口入学撲滅国民運動の先頭に立つことだよ。
裏口入学の学生を除籍処分にしないかぎり、信頼の回復はないね。つまり、いつまで経ってもシリツ医大卒＝裏口バカと汚名は拭えない。シリツ出身者こそ、裏口入学に厳しい処分せよを訴えるべき。
裏口入学医師の免許剥奪を！の国民運動の先頭に立てばよいぞ。
僕も裏口入学とか、言ってたら信頼の回復はない。 臨床医なら患者との信頼関係を築かなくてはならない。
患者に自分がド底辺シリツ医大卒であることを告げろよ！
隠すのは患者の期待権の侵害だぞ！！
更に裏口入学であることも伝えれば正直者と認めてくれるかもしれん。
まずはそれからだ。
学会の講演でも講師の卒業大学から紹介が始まるだろ。
抗がん剤過剰投与されて亡くなった女子高校生の親の手記には
亡くなった本人は主治医が東大卒と誤認していたことが記されている。
んで、あんたどこ卒？ >>980
その簡単なことができない出来損ないの行くのがド底辺シリツ医大だよなぁ。 >>987
東京医大の件があるから改定案を出してみた。
当事者としてどう思う？
ド底辺シリツ第一法則改定案
1: It is not only the lowerst-tiered medical school but intrinsically its enrollee that is despicable, which deserves to be called a bona fide moron beyond redemption.
ド底辺シリツ医大だけが悪いのではない、もともと本人の頭が悪いんだ。 医者としての常識は持ち合わせておりません 明らかに偽物です からかって遊ぶのが一番です 普通の学力があればこれくらいの英文は書ける。
ド底辺シリツ医大卒は裏口入学だからこれに英文レスできる学力はない。
Record of a DoTeihen graduate incompetent to solve linear equation
http://imagizer.imageshack.com/img923/2715/RosCsf.jpg
We are taken aback by the daunting stupidity of the DoTeihen that he is not able to calculate the male/female proportion when each ratio and overall ratio are given
How come could such a retard go to the DoTeihen medical school?
Is there any better accounting for it than his bribing his way into the DoTeihen medical school, in other word Uraguchi?
Mr. Kazuki Enari, who insists DoTeihen medical school accommodates such feebs who cannot solve quadratic equations, would be flabbergasted .
It is as easy as anything even for junior high school students to solve the problem with a linear equation.
That Doteihen dumb contends unwisely that
male/female proportion is necessary to figure out.
http://imagizer.imageshack.com/img923/9687/zNivZW.jpg
After I posted the answer of its probability 0.2575549,
he responded that the answer needed unit.
There seems to be some unit to denote probability in DoTeihen medical school , LOL
How come could such a retard go to the DoTeihen medical school?
Is there any better accounting for it than his bribing his way into the DoTeihen medical school, in other word Uraguchi?
http://imagizer.imageshack.com/img923/5683/vMw9nv.jpg >>994
二期校が羨ましいとはどこの不可触民だよ？ >>995
ド底辺シリツ医大卒はナマポにも蔑まれるって知ってる？ ド底辺シリツ医大卒という屈辱が嫌なら国立再受験すればいいのに。
まぁ、そんな学力があればド底辺シリツ医大なんぞ選択しないよな。
現在も通用する、不朽の名投稿によると８ー９割の多数意見らしいな。
(quote)
私は昭和の時代に大学受験したけど、昔は今よりも差別感が凄く、慶応以外の私立医は特殊民のための特殊学校というイメージで開業医のバカ息子以外は誰も受験しようとすらしなかった。
常識的に考えて、数千万という法外な金を払って、しかも同業者からも患者からもバカだの裏口だのと散々罵られるのをわかって好き好んで私立医に行く同級生は一人もいませんでした。
本人には面と向かっては言わないけれど、俺くらいの年代の人間は、おそらくは８－９割は私立卒を今でも「何偉そうなこと抜かしてるんだ、この裏口バカが」と心の底で軽蔑し、嘲笑しているよ。当の本人には面と向かっては絶対にそんなことは言わないけどね。
(unquote) >>833
医学医療の世界でもっとも恥ずかしいのはド底辺シリツ医大卒ってことを未だに理解できてないのかよ？
今回の東医の事件で
シリツ医大卒＝裏口という認識から
一次試験のデータ改竄まで明らかになったのだから
シリツ医大卒＝裏口バカ
という認識が国民に定着しつつある。
当事者はずっと前に認識していたようだ。
ガチの裏と呼んでその存在を認めている。
http://imagizer.imageshack.com/img923/7955/w1bWeN.jpg
この事件は第一法則を揺るがす事件だなぁ。
ド底辺シリツ医大の三法則
1: ド底辺シリツ医大が悪いのではない、本人の頭が悪いんだ。
2: ド底辺シリツ医大卒は恥ずかしくて、学校名を皆さま言いません。
3: ド底辺特殊シリツ医大卒は裏口入学の負い目から裏口馬鹿を暴く人間を偽医者扱いしたがる。 このスレッドは１０００を超えました。
新しいスレッドを立ててください。
life time: 75日 9時間 23分 4秒 5ちゃんねるの運営はプレミアム会員の皆さまに支えられています。
運営にご協力お願いいたします。
───────────────────
《プレミアム会員の主な特典》
★ 5ちゃんねる専用ブラウザからの広告除去
★ 5ちゃんねるの過去ログを取得
★ 書き込み規制の緩和
───────────────────
会員登録には個人情報は一切必要ありません。
月300円から匿名でご購入いただけます。
▼ プレミアム会員登録はこちら ▼
https://premium.5ch.net/
▼ 浪人ログインはこちら ▼
https://login.5ch.net/login.php レス数が1000を超えています。これ以上書き込みはできません。
