23/02/02 11:11:52.08 qR/nTyVF0.net
ハンプもon labelの投与だと血圧が低下しすぎることが多いのでRで関数化して計算させている。
ハンプを使ったことがあればこういうのが統計もどきにみえるはずがない。
carperitide=\(kg){# 1000microg/100mL
cat('hANP : Solve 1 Vial(=1000μg) with 5 mL of distilled water ,and add 95 mL of 5%glucose.\n\n')
on_label=c(0.1,0.2)
practical=c(0.0125,0.025)
Label=on_label*kg*100/1000*60
Pract=practical*kg*100/1000*60
cat('Practical dose :', Pract[1],'-',Pract[2],'mL/h\n') # 0.0125 - 0.025μg/kg/min
cat('On-label dose :', Label[1],'-',Label[2],'mL/h\n') # 0.1 - 0.2μg/kg/min
}
carperitide(50)