トップページ > 病院・医者 > 2019年02月10日 > 9eXx3CuI

書き込み順位&時間帯一覧

2 位/164 ID中時間01234567891011121314151617181920212223Total
書き込み数00000000000141000005042017



使用した名前一覧書き込んだスレッド一覧
卵の名無しさん
内視鏡検査について Part.3
臨床統計もおもしろいですよ、その2
底辺私立医大を卒業した医者って頭悪いよね? Part11
療養病床勤務医・老健施設勤務医が集うスレ☆ 復活版 Part.3

書き込みレス一覧

内視鏡検査について Part.3
347 :卵の名無しさん[sage]:2019/02/10(日) 11:59:10.82 ID:9eXx3CuI
>>346
母集団のピロリ感染率、がんのピロリ感染率とピロリ感染寄与率をグラフにすると

http://i.imgur.com/RaK0VLl.png
内視鏡検査について Part.3
348 :卵の名無しさん[sage]:2019/02/10(日) 12:12:06.52 ID:9eXx3CuI
>>347
がんのピロリ感染率<母集団のピロリ感染率のデータが得られたときは、ピロリ未感染ががんのリスクとして計算してグラフにすると

http://i.imgur.com/uZjwywB.png
臨床統計もおもしろいですよ、その2
756 :卵の名無しさん[sage]:2019/02/10(日) 12:37:21.35 ID:9eXx3CuI
options(digits=3)
f=function(p,q=0.99){ # p:pyroli in population, q:pyroli in cancer
a=13*q
c=13*(1-q)
b=13000*p
d=13000*(1-p)
x=(a/(a+b)-c/(c+d)) / (a/(a+b)) # attributable to pyroli(+)
y=(c/(c+d)-a/(a+b)) / (c/(c+d)) # qtteibutabel to pyroli(-)
round(ifelse(x>0,x,y),3)
}

g=Vectorize(f)
g((1:19)/20)

p=seq(0.01,0.99,0.01) # pylori in population
q=seq(0.01,0.99,0.01) # pylori in cancer
z=outer(p,q,f)
image(p,q,z,bty='l',nlevels=20,xlab='pyroli in population',
ylab='pyroli in cancer')
contour(p,q,z,bty='l',nlevels=20,xlab='pyroli in population',
ylab='pyroli in cancer',add=T)

contour(p,q,z,bty='l',nlevels=20,xlab='pyroli in population',
ylab='pyroli in cancer')

source('tools.R')
Persp(p,q,z)
Persp3d(p,q,z)
臨床統計もおもしろいですよ、その2
757 :卵の名無しさん[sage]:2019/02/10(日) 12:37:47.54 ID:9eXx3CuI
'
がん 非がん
感染  a  b
未感染 c  d

attributable risk : x
x={a/(a+b)-c/(c+d)} / {a/(a+b)}
'
底辺私立医大を卒業した医者って頭悪いよね? Part11
927 :卵の名無しさん[sage]:2019/02/10(日) 12:42:34.48 ID:9eXx3CuI
    がん 非がん
感染  a  b
未感染 c  d

attributable risk : x
x={a/(a+b)-c/(c+d)} / {a/(a+b)}

options(digits=3)
f=function(p,q=0.99){ # p:pyroli in population, q:pyroli in cancer
a=13*q
c=13*(1-q)
b=13000*p
d=13000*(1-p)
x=(a/(a+b)-c/(c+d)) / (a/(a+b)) # attributable to pyroli(+)
y=(c/(c+d)-a/(a+b)) / (c/(c+d)) # qtteibutabel to pyroli(-)
round(ifelse(x>0,x,y),3)
}

g=Vectorize(f)
g((1:19)/20)

p=seq(0.01,0.99,0.01) # pylori in population
q=seq(0.01,0.99,0.01) # pylori in cancer
z=outer(p,q,f)
image(p,q,z,bty='l',nlevels=20,xlab='pyroli in population',
ylab='pyroli in cancer')
contour(p,q,z,bty='l',nlevels=20,xlab='pyroli in population',
ylab='pyroli in cancer',add=T)
内視鏡検査について Part.3
349 :卵の名無しさん[sage]:2019/02/10(日) 13:14:47.13 ID:9eXx3CuI
胃がんのピロリ感染率を使って、それば胃がんリスクへの寄与割合であると主張できるためには
母集団のピロリ菌感染率がどれだけ以下でないとそれが主張できないかをグラフにしてみた。

http://i.imgur.com/A6h0zwQ.png

1例をあげると 胃がんのピロリ感染率が60%とすると母集団でのピロリ感染率が37.5%以下でないと寄与率が60%であると主張できない
内視鏡検査について Part.3
352 :卵の名無しさん[sage]:2019/02/10(日) 19:40:00.83 ID:9eXx3CuI
>>350
99.34%〜99.58%なら、母集団のピロリ感染率をNewton-Raphson法でだすと

> uniroot(function(x)f1(x)-x0,c(0,0.9))$root
[1] 0.689
> uniroot(function(x)f2(x)-x0,c(0,0.9))$root
[1] 0.78

まあ、7〜8割以下なら
「ピロリ菌感染が胃がんに99%寄与している」といえる。
臨床統計もおもしろいですよ、その2
758 :卵の名無しさん[sage]:2019/02/10(日) 19:40:18.09 ID:9eXx3CuI
q1=0.9934
q2=0.9958
f <- function(p,q){
a=13*q
c=13*(1-q)
b=13000*p
d=13000*(1-p)
(a/(a+b)-c/(c+d)) / (a/(a+b))
}
x0=0.985

f1=Vectorize(function(p)f(p,q=q1))
f2=Vectorize(function(p)f(p,q=q2))
curve(f1(x))
abline(h=0.985)
uniroot(function(x)f1(x)-x0,c(0,0.9))$root
curve(f2(x))
abline(h=0.985)
uniroot(function(x)f2(x)-x0,c(0,0.9))$root
療養病床勤務医・老健施設勤務医が集うスレ☆ 復活版 Part.3
943 :卵の名無しさん[sage]:2019/02/10(日) 19:44:59.61 ID:9eXx3CuI
CVネタ

救急外来でショック状態の患者にCV入れようとして動脈誤穿刺しても逆血はチアノーゼで静脈血と誤認する。

全麻中にCV入れると正しく穿刺していても静脈血が真っ赤(FiO2が高いので)動脈穿刺と誤認する。
療養病床勤務医・老健施設勤務医が集うスレ☆ 復活版 Part.3
944 :卵の名無しさん[sage]:2019/02/10(日) 19:46:29.65 ID:9eXx3CuI
>>940
>気胸自体軽すぎて

胸部単純写真と胸部CTでは気胸の評価に大差がでることがあるぞ。
療養病床勤務医・老健施設勤務医が集うスレ☆ 復活版 Part.3
945 :卵の名無しさん[sage]:2019/02/10(日) 19:47:34.32 ID:9eXx3CuI
顛末はしらないが、巨大ブラを気胸と間違えて穿刺したという話をきいたことがあるなぁ。
内視鏡検査について Part.3
353 :卵の名無しさん[sage]:2019/02/10(日) 21:19:30.31 ID:9eXx3CuI
The prevalence of H. pylori and severity of atrophy were examined in 1381 patients including 289 patients examined in the 1970s (158 men; mean age, 44.9 years),
787 in the 1990s (430 men; 44.2 years), and 305 in the 2010s (163 men; 53.2 years).
Overall, the prevalence of H. pylori infection decreased significantly from 74.7% (1970s) to 53% (1990s) and 35.1% (2010s) (p < .01).

ピロリ感染率のサンプルサイズが305で35.1%が陽性ということだから107/305だろね。

> binom::binom.exact(107,351,conf.level = 0.99)
method x n mean lower upper
1 exact 107 351 0.3048433 0.2431662 0.3719357

99%信頼区間が 24 〜 37% ではあるけど。
内視鏡検査について Part.3
354 :卵の名無しさん[sage]:2019/02/10(日) 21:36:23.05 ID:9eXx3CuI
MATERIALS AND METHODS:
The prevalence of H. pylori infection and histologic grades of gastric damage were retrospectively evaluated using gastric biopsy specimens obtained over a 40-year period.
ということなので、生検を受けた人が対象だから、日本人から無作為抽出されたとは言い難いだろうな。
生検部位って腫瘍を疑う部位から生検するだろうからピロリ感染あっても陰性と判定されている可能性が考えられる。

300程度のサンプルサイズを日本人全体の推測に使ってよいのかは、俺は疑問だね。
底辺私立医大を卒業した医者って頭悪いよね? Part11
937 :卵の名無しさん[sage]:2019/02/10(日) 21:47:17.80 ID:9eXx3CuI
高校の進路指導って、どこの大学なら受かるかをアドバイスするだけだよなぁ。
教員が様々な職業に向き不向きを熟知しているはずもなし。

結局、サラリーマン教員にとって
教え子から何人東大合格と国立医学部合格を出すからが教員の評価に繋がるってことだと、
ようやくわかった。

俺の頃は1期2期校の時代だったから、サラリーマン教員には両方で貢献したな。
接客業ってほとんど頭を使わないね。

https://egg.5ch.net/test/read.cgi/hosp/1543716247/333-354
のようなアカデミックな議論ができる医師もいて少し安心した。
底辺私立医大を卒業した医者って頭悪いよね? Part11
939 :卵の名無しさん[sage]:2019/02/10(日) 21:52:51.71 ID:9eXx3CuI
モルってなんですか? とか質問するような裏口馬鹿がいると 疲れるだろうなぁ。
底辺私立医大を卒業した医者って頭悪いよね? Part11
941 :卵の名無しさん[sage]:2019/02/10(日) 22:00:08.05 ID:9eXx3CuI
ド底辺シリツや地域枠じゃなきゃ、蔑まれることはないね。
底辺私立医大を卒業した医者って頭悪いよね? Part11
943 :卵の名無しさん[sage]:2019/02/10(日) 22:04:21.98 ID:9eXx3CuI
ド底辺シリツ医大選択ほど、蔑まれることはないね。

東大卒はもちろん、ナマポからも蔑まれる。

東大卒
http://ishikisoku.com/wp-content/uploads/2016/12/SQIR26V.jpg

生活保護受給者
h517 卵の名無しさん 2018/02/25(日) 11:36:00.56 ID:gq76tAvs
福岡のあの歯科大かな?
歯科口腔外科で抜歯依頼したら爺ちゃんが〇〇歯科大卒の先生は避けて下さいねがあったけど。
この爺ちゃん、聖マリ卒の先生もよけて下さいと初診時に言ってた札付き爺さん。
生保受給者のくせにね。

そして、当事者
>でも一生、卒業大学を隠すのは本当に辛い   
だそうです。
http://imagizer.imageshack.com/img922/6510/c71CG3.jpg


※このページは、『2ちゃんねる』の書き込みを基に自動生成したものです。オリジナルはリンク先の2ちゃんねるの書き込みです。
※このサイトでオリジナルの書き込みについては対応できません。
※何か問題のある場合はメールをしてください。対応します。