底辺私立医大を卒業した医者って頭悪いよね？ Part16
すなわち、タイトルの正しさを検証するスレです。
※前スレ
底辺私立医大を卒業した頭悪いよね？
http://egg.2ch.sc/test/read.cgi/hosp/1472273747/
底辺私立医大を卒業した医者って頭悪いよね？ Part2
http://egg.2ch.sc/test/read.cgi/hosp/1520807375/
底辺私立医大を卒業した医者って頭悪いよね？ Part3
http://egg.2ch.sc/test/read.cgi/hosp/1522967067/
底辺私立医大を卒業した医者って頭悪いよね？ Part4
http://egg.2ch.sc/test/read.cgi/hosp/1526677794/
底辺私立医大を卒業した医者って頭悪いよね？ Part5
http://egg.2ch.sc/test/read.cgi/hosp/1529666055/
底辺私立医大を卒業した医者って頭悪いよね？ Part6
http://egg.2ch.sc/test/read.cgi/hosp/1531305684/
底辺私立医大を卒業した医者って頭悪いよね？ Part7
http://egg.2ch.sc/test/read.cgi/hosp/1532472024/
底辺私立医大を卒業した医者って頭悪いよね？ Part8
http://egg.2ch.sc/test/read.cgi/hosp/1533510399/
底辺私立医大を卒業した医者って頭悪いよね？ Part9
http://egg.2ch.sc/test/read.cgi/hosp/1535547275/
底辺私立医大を卒業した医者って頭悪いよね？ Part10
https://egg.2ch.sc/test/read.cgi/hosp/1537867846/
底辺私立医大を卒業した医者って頭悪いよね？ Part11
https://egg.2ch.sc/test/read.cgi/hosp/1544320163/
底辺私立医大を卒業した医者って頭悪いよね？ Part12
https://egg.2ch.sc/test/read.cgi/hosp/1550969602/
底辺私立医大を卒業した医者って頭悪いよね？ Part13
https://egg.2ch.sc/test/read.cgi/hosp/1575242106/
底辺私立医大を卒業した医者って頭悪いよね？ Part14
https://egg.2ch.sc/test/read.cgi/hosp/1578616997/
底辺私立医大を卒業した医者って頭悪いよね？ Part15
https://egg.2ch.sc/test/read.cgi/hosp/1584050953/
底辺私立医大卒が国立大学医学部卒を妬むスレ [転載禁止](c)2ch.sc
http://potato.2ch.sc/test/read.cgi/hosp/1424846816/695
695 名前：卵の名無しさん[] 投稿日：2016/09/25(日) 22:04:25.53 ID:FzuOCpqV
匿名先生
精神科
▲
1
評価
私立出でも、素晴らしい医師がいるし、国立でも、どうしようもないのもいる。
そんなのは、あくまで個人の資質差と思ってました。
が、
今いる病院（医師の大部分が、いわゆる底辺私立）に来て、その考えは変わりました。
とある、気に食わない医師の白衣やサンダルを隠す、机の上にゴミを置く、など、小学生じみた嫌がらせをしている医師というのを、はじめて見ました。
国立出の変人も多々みてきましたが、こんな、小学生のイタズラみたいなことをする人は、いませんでした。
やはり、底辺私立は、それなりなんだと思いました。
2016年09月02日 00時21分09秒
ド底辺シリツ医大進学は本人の選択だよなぁ。
これな！
不朽の名投稿
>>
私は昭和の時代に大学受験したけど、昔は今よりも差別感が凄く、特殊民のための特殊学校というイメージで開業医のバカ息子以外は誰も受験しようとすらしなかった。
常識的に考えて、数千万という法外な金を払って、しかも同業者からも患者からもバカだの裏口だのと散々罵られるのをわかって好き好んでド底辺医に行く同級生は一人もいませんでした。
本人には面と向かっては言わないけれど、俺くらいの年代の人間は、おそらくは８−９割はド底辺医卒を今でも「何偉そうなこと抜かしてるんだ、この裏口バカが」と心の底で軽蔑し、嘲笑しているよ。
当の本人には面と向かっては絶対にそんなことは言わないけどね。
<<
東京医大の事件は裏口入学が現在進行形であること如実にしめした事件だよね。
シリツ医の使命は裏口入学撲滅国民運動の先頭に立つことだよ。
裏口入学の学生を除籍処分にしないかぎり、信頼の回復はないね。つまり、いつまで経ってもシリツ医大卒＝裏口バカと汚名は拭えない。シリツ出身者こそ、裏口入学に厳しい処分せよを訴えるべき。
裏口入学医師の免許剥奪を！の国民運動の先頭に立てばよいぞ。
僕も裏口入学とか、言ってたら信頼の回復はない。
１次方程式もできないド底辺特殊シリツ医大卒の記録
http://imagizer.imageshack.com/img923/2715/RosCsf.jpg
何度読んでも馬鹿すぎる。
男女別の割合と全体での割合から男女比が計算できるとも思わないとは。
なんでこんなのが大学に入れるわけよ？
裏口入学以外に説明がつく？
中学生でも解ける一次方程式の問題だろ。
それすらできない馬鹿が自信を持って発言。
>患者の男女比が必要なのもわからないのか？
だとさ。
http://imagizer.imageshack.com/img923/9687/zNivZW.jpg
0.2575549
と答を書いてやったら
>単位も書かずに答えだとか…
ド底辺シリツ医大では確率に単位があるらしいぞw
何でこんな馬鹿が大学に入れるわけ？
裏口入学以外に説明がつく？
http://imagizer.imageshack.com/img923/5683/vMw9nv.jpg
氷山の一角だと俺は思っている。
http://i.imgur.com/ArPaux9.png
https://video.twimg.com/ext_tw_video/1222876611202039813/pu/vid/960x540/6bltLho4FsG07Wk2.mp4
山添「つまり趣旨は伝わってるんですよ、総理、いかがですか」
安倍
「ですが、しゅし、趣旨については伝わったという話をいたしましたが、こっ…こっ…ﾁｯ…
このですね、この、ｲﾜﾊﾞｯ、ｻｧﾝｷﾞﾝの……………が、書いた、いるですね、この ｫｰ
ｷﾞｮｳｾｲｷｶﾝﾉﾎﾕｳｽﾙｼﾞｮｳﾎｳﾉｺｳｶｲﾆｶﾝｽﾙﾎｳﾘﾂﾆﾓﾄﾁﾞｭｲﾃ、名簿全体を、公開されることもありますと
いうこと、では、ｷきていない、ということは申し上げた、わけで、あります
で、そもそもですね！えー、この…この、最初の、ないか、えー、れんらく、うー
事務連絡で、かいたあることもですね、えー、ｶｲ請求の対象！とされることも、あります！
とこうかいて、ｳｪ、ある、わけぇ、で、ｱﾘﾏｼﾃ、対象とされることもありますということとですね、
ｴ、ｶｲｼﾞ、ｴ、ｱﾉﾑ、名簿ｼﾞｪﾝﾀｲを公開される、ということとは、これ、ｴｰ、…f…fｾ、請求の対象ﾄｾ！
対象ですから！対象とされたってこと、でありますから、そこが、ﾏｧ違うということだとｵﾓﾏｽｶﾞ
いずれぇいたしましてもですね、ｲｽﾞﾚｪいたしましても、いわば、ｱ､そうい、う、方、をですね、
ｴｰ、選んでくださいと、いうことについては、ｿﾚｧ、当然、ｴｷﾃｲﾙということは
先ほども申し上げた趣旨、にﾁｭｲﾃﾊ、申し上げている通りであります」
山添「ちょっとはっきり趣旨が分かりませんけども」
最後にド底辺医大の三法則を掲げましょう。
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 which they have 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.
ド底辺シリツ医大卒は裏口入学の負い目から裏口馬鹿を暴く人間を偽医者扱いしたがる。
前々スレからのド底辺シリツ医への宿題
若い女性研修医（嘘つきかどうかは不明）から
「あなたのいうことが正しければ手コキかRをしてあげる、そうでなければセンズリを命じる」と言われた。
Rをしてもらうには何と言えばいいか？
答だせないってアホなの？
Rよりセンズリが好きなの？
y=c(rep(NA,N-1),30) # c(NA,NA,....,30)
thresh=cbind(rep(15,N),rep(25,N),rep(30,N)) # 15,25,30
ybin=c(rep(1,N-1),3) # 0:[,15), 1:[15,25), 2:[25,30), 3:[30,]
data=list(N=N,y=y,ybin=ybin,thresh=thresh)
inits=list(theta=0.5)
model.string='
model{
for (i in 1:N){
ybin[i] ~ dinterval( y[i] , thresh[i, ] )
y[i] ~ dbin(theta,50)
}
theta ~ dbeta(1,1)I(0.25,1)
}
'
https://kosugitti.github.io/JSSP2018Summer/jssp05.html#%E6%89%93%E3%81%A1%E5%88%87%E3%82%8A%E3%83%87%E3%83%BC%E3%82%BF
prev, # prevalence
sen=0, # sensitivity
spc=1){ # specificity
data.frame(p = prev*sen + (1-prev)*(1-spc),
PPV=sen*prev/(sen*prev+(1-prev)*(1-spc)),
NPV=(1-prev)*spc/((1-prev)*spc+prev*(1-sen)),
precision=(prev*sen+(1-prev)*spc)/
((prev*sen+(1-prev)*spc+(1-prev)*(1-spc)+(prev*(1-sen)))),
pLR=sen/(1-spc),
nLR=(1-sen)/spc,
DOR=pLR/nLR)}
source('tools.R')
Prev2PV <- function(
prev=0.003,
SEN=0.5, # 感度最頻値 beta(13.6991,9.4661)でmode 0.6, sd=0.1
SD1=0.2,# 感度標準偏差
SPC=0.95, # 特異度最頻値 beta(36.172,4.908)でmode 0.9 sd=0.05
SD2=0.05, # 特異度標準偏差
MODE=FALSE, # 最頻値表示,期待値表示
N.ITER=NULL, # JAGSのサンプリング回数
THIN=NULL, # THIN毎にデータ採用
print=TRUE){ # グラフを描くか?
library(rjags)
library(BEST)
sn=Mv2ab(SEN,SD1^2) # Mode variance -> Beta(a,b)のパラメータに
sp=Mv2ab(SPC,SD2^2)
# n : 日々の検査人数配列 x:日々の陽性人数配列
modelstring='
model
{
p = prev*sen + (1-prev)*(1-spc) ;
PPV=sen*p/(sen*p+(1-p)*(1-spc));
NPV=(1-p)*spc/((1-p)*spc+p*(1-sen));
precision=(p*sen+(1-p)*spc)/((p*sen+(1-p)*spc+(1-p)*(1-spc)+(p*(1-sen))));
pLR=sen/(1-spc);
nLR=(1-sen)/spc;
DOR=pLR/nLR;
sen ~ dbeta(sn[1],sn[2])
spc ~ dbeta(sp[1],sp[2])
}
'
dataList=list(prev=prev,sn=sn,sp=sp)
jagsModel = jags.model( file="TEMPmodelj4.txt" ,data=dataList, n.chains=4,quiet=TRUE)
update(jagsModel)
codaSamples=coda.samples(jagsModel,
variable.names=c("PPV","NPV","precision","pLR","nLR","DOR"),
n.iter=ifelse(is.null(N.ITER),1e5,N.ITER),
thin=ifelse(is.null(THIN),1,THIN))
js=as.data.frame(as.matrix(codaSamples))
par(mfrow=c(3,2))
BEST::plotPost(js$PPV,xlab='PPV',col='pink')
BEST::plotPost(js$NPV,xlab='NPV')
BEST::plotPost(js$precision,xlab='precision')
BEST::plotPost(js$pLR,xlab='pLR')
BEST::plotPost(js$nLR,xlab='nLR')
BEST::plotPost(js$DOR,xlab='DOR')
invisible(js)
}
さらにそれで感染した同僚が無症候でまわりにばら撒くんだぜ
いくらプロでもこんなん防げねーよ全患者・全職員に対し常時完全防備なんてできねーし
なんならいっそ一般病棟よりコロナ病棟入ったほうが全員が最初からわかって対策できるぶん感染リスク少ねーと思うわ
library(rjags)
# model string
modelstring = "
model {
for ( i in 1:N ) {
ybin[i] ~ dinterval( y[i] , thresh[i,] )
y[i] ~ dnorm( mu , tau )
}
tau ~ dt(0,pow(2.5,-2),1)T(0,)
# tau ~ dgamma(.001,.001)
sigma = sqrt(1/tau)
mu ~ dnorm(0,1E-6)
}
"
N=500 ; MU=100 ; SD=15
set.seed(19791017) ; Y=MU + SD*scale(rnorm(N))
# Generate cencored data y:
# threshold 0 1 2 3
# censored 94-100 106-
fn <- function(
t1=94,
t2=100,
t3=106){
y=Y=as.numeric(Y)
thresh=matrix(rep(c(t1,t2,t3),N),ncol=3,b=T)
ybin=numeric(N)
idx0=which(Y<t1)
ybin[idx0]=0
idx1=which(t1<=Y & Y<=t2)
ybin[idx1]=1
idx2=which(t2<Y & t3<Y)
ybin[idx2]=2
idx3=which(t3<=Y)
ybin[idx3]=3
y[c(idx1,idx3)]=NA
list(y=y,ybin=ybin,thresh=thresh)
}
re=fn()
data=list(y=re$y,ybin=re$ybin,thresh=re$thresh,N=N)
writeLines(modelstring,con="model.txt")
jagsModel=jags.model('model.txt',data=data,n.chains = 1)
codaSamples=coda.samples(jagsModel,n.iter=1e4,thin=1,
variable.names = c("mu","sigma") )
js=as.data.frame(as.matrix(codaSamples))
layout(matrix(1:2,2))
BEST::plotPost(js$mu,xlab='μ = 100',showMode = T)
BEST::plotPost(js$sigma,xlab='σ = 15',showMode = T)
https://www.nature.com/articles/s41591-020-0869-5
感染させる確率分布をガンマ分布を平行移動させた分布として想定して、データから最尤法でパラメータ算出している。
そのプログラムをみていくと
感染させる確率分布を
#--- infectiousness, gamma distribution ---
# gpar[1:2]: hyper-parameters (gamma)
# x : infection time of infectee w.r.t onset time of infector
f.Xc = function(x, gpar) { dgamma(x, gpar[1], gpar[2]) }
ガンマ分布にしているけど
一人が一人を感染させるモデルだから
形状パラメータgpar[1]は1で固定、つまり、指数分布だと思うんだがどうだろ？待ち時間の分布と同じ考え。
w.r.t = with reference to
ひとりが別の一人に一回感染させるというモデルなので待ち時間の分布の指数分布でいいと思う。
ガンマ分布の形状パラメータ＝１とおけば指数分布になる。
プログラムを書き直してグラフにすると
https://i.imgur.com/paErvfa.png
発症前に感染させている確率は47％と原著とあまりかわらないが、そのピークは発症1.6日前という結果になった。
http://i.imgur.com/ArPaux9.png
算数の掛け算すら怪しいのがシリツ医がこういう事故を起こすわけなんだな。
://i.imgur.com/ArPaux9.png
前スレからのド底辺シリツ医への宿題
若い女性研修医（嘘つきかどうかは不明）から
「あなたのいうことが正しければ手コキかRをしてあげる、そうでなければセンズリを命じる」と言われた。
Rをしてもらうには何と言えばいいか？
答だせないってアホなの？
Rよりセンズリが好きなの？
997卵の名無しさん2020/04/27(月) 19:05:04.10ID:ek/DjIvE
>>5
答えてやろうｗ
正直に「俺はド底辺私立医大卒の医者です」と言うｗ
前スレの続きだがこれで答えは正解？
install.packages(InstalledPackages)
アホ晒して楽しい？
saliva+ saliva-
swab+ 26 3
swab- 8 1
"
prop.test(c(9,4),c(38,38))
poisson.test(c(9,4),c(38,38),alt='g')
https://i.imgur.com/3GWmZz3.png
を見つけたのでKappa値や信頼区間を出して遊んでみよう〜っと。
仮想データで遊ぶより、面白いな。
swabと唾液でまあ、結果が合致している。
> print(fit.kappa,pars=c('kappa','PABAK'))
Inference for Stan model: kappa.
4 chains, each with iter=2000; warmup=1000; thin=1;
post-warmup draws per chain=1000, total post-warmup draws=4000.
mean se_mean sd 2.5% 25% 50% 75% 97.5% n_eff Rhat
kappa 0.81 0 0.07 0.65 0.77 0.81 0.86 0.92 3540 1
PABAK 0.93 0 0.02 0.88 0.92 0.93 0.95 0.97 3342 1
JAGSでMCMCしてもほぼ同じ結果。
https://i.imgur.com/XKT53Fy.png
40人懇親会で何が起きていたか？？？
文春オンライン
https://bunshun.jp/articles/-/37104?page=1
きちんと勉強机の前に座って勉強しないとまた浪人するよｗｗｗｗ
で25浪くらいかｗｗｗｗ
医科歯科大卒を自称してもウソはバレバレだからｗｗｗｗ
内視鏡バイト先が緊急事態宣言解除まで休診だけど６〜１０割給与がでるのでなんだか悪いな。
バイト医を解雇する病院とかでてきているらしいなぁ。
新型コロナウイルス対策 in 医者板 Part.8
https://egg.2ch.sc/test/read.cgi/hosp/1587582729/771
771 名前：卵の名無しさん[] 投稿日：2020/04/28(火) 15:49:26.22 ID:kb7Uq7l8
>>766
＞こういう計算ができる歯医者は国立卒だろうな。
国立の阪大卒の歯医者ですが全く分かりません。（石神井の学院出身）
歯医者の知性の低さを侮らないで下さい。
医学部に行けなかったから歯学部に行ったのでは無く
親の病院を継ぎたく無いから歯学部に入ったリヴァタリアンなのですから
お医者さんのような社会的動機的知性を持っている歯医者なんていませんよ。（ダブルライセンスの先生は別として）
やる気ない人生を楽しむ為に歯医者になったんですから。でもお医者様に関してはリスペクトしてます。
drawn from the urn without replacement. Then y1, the number of white balls drawn from
the urn, has a hypergeometric distribution
y1 ~ dhyper(n1,n2,m1,1)
The non-central hypergeometric distribution with odds ratio parameter ψ≠ 1 arises when
m1 is the sum of two binomial distributions
m1 ~ sum(y1, y2)
y1 ~ dbin(p1, n1)
y2 ~ dbin(p2, n2)
If m1 is observed, the conditional distribution of y1 has a non-central hypergeometric distribution
with odds ratio parameter
ψ = p1(1 - p2) / (1 - p1)p2
There are two important things to note. Firstly, the value of m1 is not fixed a priori but is a
random variable. Secondly, the hypergeometric distribution does not depend on the absolute
values of the underlying binomial probability parameters p1; p2 but only their odds ratio .
ド底辺シリツ医大にある年の裏口受験票があることが判明した。
枚数は１０００枚以下であることは判明しているが、その数を推定したい。
裏口入学調査員が無作為に１０枚選んで番号を記録して元に戻した。
別の裏口入学調査員が無作為に２０枚選んで番号を記録した。
二人の調査員の記録した番号を照合すると３枚の番号が一致していた。
この情報からこの年の裏口受験証の数の最頻値、期待値とその９５％信頼区間を求めよ。
"
Nmax=1000
g=10
b=20
x=3
Nmin=max(g,b)
prob=rep(c(0,1/(Nmax-Nmin)),c(Nmin-1,Nmax-Nmin+1))
model.string='
model{
N ~ dcat(prob[]) # 離散量分布
x ~ dhyper(g,N-g,b,1) # 1: central hypergeometric distribution
}
'
writeLines(model.string,'tmp.txt')
dataList=list(g=g,b=b,x=x,prob=prob)
JagsModel=jags.model('tmp.txt', n.chains=4, data=dataList)
codaSamples=coda.samples(JagsModel,n.iter=1e4,thin=1,
variable.names = c('N'))
plot(codaSamples)
js=as.data.frame(as.matrix(codaSamples))
layout(matrix(1:2,2))
hist(js$N,breaks=1000,border = 'skyblue',freq=F,xlim=c(0,Nmax))
summary(js$N)
quantile(js$N,c(.025,.975))
HDInterval::hdi(js$N)
plot(table(js$N), col='lightgreen',bty='l',xlim=c(0,Nmax))
layout(1)
BEST::plotPost(js$N,breaks=100)
as.numeric(names(which.max(table(js$N))))
density(js$N)$x[which.max(density(js$N)$y)] # MODE
国語 次の漢字の読み方を答えよ
血管 細菌 病気
数学
3 +5=
7+2=
6-4=
英語 アルファベットをAからZまで大文字で全て書け
社会
江戸幕府を開いた人は次のうち誰？
A.徳川家康
B.豊臣秀吉
C.織田信長
理科
時速50Kmの自家用車が15Kmを走るのに要する時間を答えなさい。
シリツ医に計算させて医療に従事させるみたいなもんだな。
算数の掛け算すら怪しいのがシリツ医がこういう事故を起こす。
http://i.imgur.com/ArPaux9.png
検査やりません
外国人どんどん来てだもん
初期行動がこれだから、いくら問題になろうとどっかでコソコソ動いて本筋に戻したいのよ準備してたから
ほとぼり冷めたと思ったのか感染研辺り奇妙な事言い出し始めた
http://statmodeling.hatenablog.com/entry/covid19-estimate-total-number-of-positives-in-japan
COVID-19 日本国内の潜在的な陽性者数を推定する試み
実際の医療はパターンばっかりの中に器用さが求められたり、実直さが必要だったりいろんな才能が必要だと思うよ
ゲームが上手いと手術が上手い事が多いかもしれないので私立の方がいいかもしれん
第一出身大学は聞かないとわからない
いちいち入試問題を解かすわけじゃ無いのでね
私立は入試のボーダーは国立より低いだろうけど低いなりに競争はある
私立にも入れない人か、学歴コンプが気にするんだろう
rm(list=ls())
library(rjags)
modelString='
model {
for (a in 1:A) {
n.pos[a] ~ dbinom(p.pos, N[a])
n.sym[a] ~ dbinom(q[a], n.pos[a])
n.asy[a] <- n.pos[a] - n.sym[a]
Y.sym[a] ~ dbinom(p.obs.sym, n.sym[a])
Y.asy[a] ~ dbinom(p.obs.asy, n.asy[a])
Y.sym.DP[a] ~ dbinom(q[a], N.pos.DP[a])
logit(q[a]) <- q.x[a]
}
n.pos.sum <- sum(n.pos)
# positive rate = prevalence*sensitivity + (1 - prevalence)*(1 - specificity)
# prevalence = (specificity + positive rate - 1) / (specificity + sensitivity - 1)
prevalence <- (spc + p.pos -1)/(spc + sen -1)
sen ~ dbeta(sn[1],sn[2])
spc ~ dbeta(sp[1],sp[2])
p.pos ~ dbeta(0.5, 1)
p.obs.sym ~ dbeta(4, 2)
p.obs.asy ~ dbeta(2, 4)
q.x[1] ~ dnorm(0, 1e-4)
q.x[2] ~ dnorm(0, 1e-4)
for (a in 3:A) {
q.x[a] ~ dnorm(2*q.x[a-1] - q.x[a-2], tau)
}
tau ~ dt(0,pow(2.5,-2),1)T(0,)
}
'
SEN=0.5 ; SD1=0.2
SPC=0.9 ; SD2=0.05
sn=Mv2ab(SEN,SD1^2) # Mode variance -> Beta(a,b)のパラメータに
sp=Mv2ab(SPC,SD2^2)
pop=c(472,506,534,577,639,627,667,747,855,982,861,778,745,843,899,716,537,369,181,52)
A=10
N=(pop[(1:10)%%2==1] + pop[(1:10)%%2==0])*1e4
plot(N,type='h',bty='l')
Y.sym.DP=c(0,2,25,27,19,28,76,95,27,2)
N.pos.DP=c(1,5,28,34,27,59,177,234,52,2)
Y.sym=c(19,20,256,212,296,334,280,212,114,4)
Y.asy=c(6,12,30,23,32,20,21,19,17,6)
plot(0:(A-1)*10,Y.sym.DP/N.pos.DP,type='h',bty='l',xlab='age')
lines((0:9*10)+1.5,Y.sym/(Y.sym + Y.asy),type='h',col='red')
dataList=list(N=N,Y.sym=Y.sym,Y.asy=Y.asy,
Y.sym.DP=Y.sym.DP,N.pos.DP=N.pos.DP,A=A,
sn=sn,sp=sp)
writeLines(modelString,'temp.txt')
jagsModel=jags.model('temp.txt',data=dataList, n.chains=4,n.adapt = 50000)
update(jagsModel,50000)
codaSamples=coda.samples(jagsModel, n.iter=50e4,thin=100,
variable.names = c('n.pos.sum', 'n.pos', 'p.pos', 'p.obs.sym', 'p.obs.asy', 'q'))
mat=as.matrix(codaSamples)
colnames(mat)
js=as.data.frame(mat)
attach(js)
summary(p.pos)
summary(n.pos.sum)
手先の器用な奴はシリツにもいるが（上皇の執刀医）、
頭が器用なシリツ医はまず、いない。特待生ならいるかもしれんが。
このスレのシリツ医は知恵遅れなのは明らか。
なんで、不正って分かってて退学にならないの？
大分の公務員試験は、本人は全く知らずに、親が頼んでたのが分かっただけで、勤務してたのに、解雇になったのに。
ありえないよ。
シリツ医の使命は裏口入学撲滅国民運動の先頭に立つことだよ。
裏口入学の学生を除籍処分にしないかぎり、信頼の回復はないね。つまり、いつまで経ってもシリツ医大卒＝裏口バカと汚名は拭えない。シリツ出身者こそ、裏口入学に厳しい処分せよを訴えるべき。
裏口入学医師の免許剥奪を！の国民運動の先頭に立てばよいぞ。
僕も裏口入学とか、言ってたら信頼の回復はない。
by 浩之
http://statmodeling.hatenablog.com/entry/covid19-estimate-total-number-of-positives-in-japan
の設定を踏襲して、データを更新して
COVID-19 日本国内の陽性率を推定してみると
推定陽性率は
> summary(p.pos) ; HDInterval::hdi(p.pos)[1:2]
Min. 1st Qu. Median Mean 3rd Qu. Max.
0.000031 0.000067 0.004681 0.005229 0.009325 0.016658
lower upper
0.00003082 0.01408833
推定有病率は
> summary(prevalence) ; HDInterval::hdi(prevalence)[1:2]
Min. 1st Qu. Median Mean 3rd Qu. Max.
0.00000 0.00166 0.00529 0.01040 0.01129 0.16078
lower upper
0.0000005693 0.0305640211
算数の掛け算すら怪しいから、治療に当たらせては駄目。医療ミスをコロナのせいにしてしまうから。
http://i.imgur.com/ArPaux9.png
「緊急事態宣言で失う命は救う命より多い」
http://ikedanobuo.livedoor.biz/archives/52040812.html
(deleted an unsolicited ad)
(deleted an unsolicited ad)
https://twitter.com/ikedanob/status/1254976443072737281
(deleted an unsolicited ad)
https://twitter.com/ikedanob/status/1254973021074288640
(deleted an unsolicited ad)
(deleted an unsolicited ad)
https://twitter.com/ikedanob/status/1255144208433770502
(deleted an unsolicited ad)
(deleted an unsolicited ad)
(deleted an unsolicited ad)
https://twitter.com/suzukimasayuki/status/1255053567578173536
(deleted an unsolicited ad)
by 浩之
(deleted an unsolicited ad)
それって某医科歯科爺さんのことですか？ｗ
https://twitter.com/ikedanob/status/1254964694961381376
(deleted an unsolicited ad)
(deleted an unsolicited ad)
by 浩之
by浩之
「私大医学部は金持ちのバカばかり」伝説はもはや過去の話
「私大医学部は金持ちのバカばかり」伝説はもはや過去の話
https://ent.smt.docomo.ne.jp/article/527223
んなこたーないｗ
アホばっかやでｗ
by 浩之
by 浩之
嫁はんが厳しいからのう
by 浩之
臨床をやっている女医は不細工か不倫しているかのどちらかである。
(エビデンスレベルV、個人の経験 n =21)
当直がなくなると、外泊の口実がなくなるからねｗ
by 浩之
女医と看護師は地雷原ｗ
ドエライ目に会うぞｗ
>>80
学会が口実としては最高ｗ
まずバレないｗ
事前調査をしないと「社会勉強」で地雷を踏むｗ
by浩之
ド底辺シリツ医大進学は本人の選択だよなぁ。
これな！
不朽の名投稿
>>
私は昭和の時代に大学受験したけど、昔は今よりも差別感が凄く、特殊民のための特殊学校というイメージで開業医のバカ息子以外は誰も受験しようとすらしなかった。
常識的に考えて、数千万という法外な金を払って、しかも同業者からも患者からもバカだの裏口だのと散々罵られるのをわかって好き好んでド底辺医に行く同級生は一人もいませんでした。
本人には面と向かっては言わないけれど、俺くらいの年代の人間は、おそらくは８−９割はド底辺医卒を今でも「何偉そうなこと抜かしてるんだ、この裏口バカが」と心の底で軽蔑し、嘲笑しているよ。
当の本人には面と向かっては絶対にそんなことは言わないけどね。
<<
東京医大の事件は裏口入学が現在進行形であること如実にしめした事件だよね。
シリツ医の使命は裏口入学撲滅国民運動の先頭に立つことだよ。
裏口入学の学生を除籍処分にしないかぎり、信頼の回復はないね。つまり、いつまで経ってもシリツ医大卒＝裏口バカと汚名は拭えない。シリツ出身者こそ、裏口入学に厳しい処分せよを訴えるべき。
裏口入学医師の免許剥奪を！の国民運動の先頭に立てばよいぞ。
僕も裏口入学とか、言ってたら信頼の回復はない。
学生時代には女子医大の学生には息子が大変お世話になりました。
トンデモない性癖の持ち主だったな（N＝２）
具体的には書かれへんｗ
by 浩之
俺の息子は大変に鍛えられましたｗ
ド底辺シリツ医大進学は本人の選択だよなぁ。
ド底辺シリツ医大にしか入れない子供だとわかったとき両親はどれだけ悲しんだことだろう。
症例提示
私立医学部医学科ｋａｒｔｅ213 [無断転載禁止]©2ch.sc
https://tamae.2ch.sc/test/read.cgi/kouri/1454692118/319
319 名前：大学への名無しさん[] 投稿日：2016/02/11(木) 22:52:02.21 ID:50TBuVXh0
恥ずかしながら実はうちの親がそうなんです
私立洗顔でした
本人は隠したがっていたけど祖父が公言してたからね
祖父は息子（うちの父親）の学力など知らずに進路指導で当たり前に自分の出身医大（国立）を希望させ父親の担任に無理だと断言されこれが一生で最大の屈辱だったそうです
祖父が何十年もたってるのに死ぬまで祖母をその事で叱りつけてました
お前がしっかり勉強させないからこうなったっとね
自分は教育に失敗したが祖父の口癖
これが私大医学部ＯＢの悲しい現実
これが現実です
by 浩之
地方国立ぐらいで十分だからさ
なにも大金費やして「特別受験」する必要はない
log（対数）を10グラムと読んでしまうアホなんか使い物になるわけあらへん
by 浩之
入りたくても入れなかったんだね
真っ赤だよ
by 浩之
by 浩之
by 浩之
誤って10倍量の薬を処方 子供が救急搬送される 院外の薬局が｢投与量が多いのでは｣と問い合わせるも、間違いに気づかず・尼崎の医者 [水星虫★]
https://asahi.2ch.sc/test/read.cgi/newsplus/1588064644/
数字以前に、手コキ問題にも答が出せないのがド底辺シリツ医。
同僚も上司も裏口だらけなのか、本人が馬鹿すぎて相手にされないんだろう。
最後にド底辺医大の三法則を掲げましょう。
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 which they have gone through.
ド底辺シリツ医大卒は恥ずかしくて、学校名を皆さま言いません。
3: The Do-Teihen graduates are so ashamed of having bought their way into the exclusively bottom-tiered medical school
that they tend to call a genuine doctor a charlatan who elucidates their imbecility.
ド底辺シリツ医大卒は裏口入学の負い目から裏口馬鹿を暴く人間を偽医者扱いしたがる。
前々スレからのド底辺シリツ医への宿題
若い女性研修医（嘘つきかどうかは不明）から
「あなたのいうことが正しければ手コキかRをしてあげる、そうでなければセンズリを命じる」と言われた。
Rをしてもらうには何と言えばいいか？
答だせないってアホなの？
Rよりセンズリが好きなの？
病院はまずCT撮る。肺炎あればPCR検査。なければ帰す。(病院は通達通りで責任回避)
紹介した開業医にはコロナ肺炎あれば結果が保健所から通知あり。
肺炎なけれぱ紹介のガイドラインを書いてある通知が初めの1回目から全部再送られてくる。
よく読めよ、と。
だから誰も悪くないんだよ。
これに似ているなぁ。
ド底辺シリツ医大が悪いのではない、本人の頭が悪いんだ。
100〜のスレッドの続きを読む