MikuHatsune https://blog.hatena.ne.jp/MikuHatsune/ 驚異のアニヲタ社会復帰の予備 https://mikuhatsune.hatenadiary.com/ R 医学 日本アレルギー学会のアナフィラキシーガイドラインを読んだ。 最近プロットしてなかったので、死亡原因をプロットした。 dat <- read.delim("clipboard") anaph <- dat[, -1] yl <- c(0, 40) par(mar=c(4.5, 4.5, 2, 5), cex.lab=1.6) matplot(dat$year, anaph, ylim=yl, type="l", lty=1, lwd=3, xlab="年", ylab="アナフィラキシー原因と死亡者数") text(par()$usr[2], tail(anaph, 1), colnames(a… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fmikuhatsune.hatenadiary.com%2Fentry%2F20141114%2F1415969382" title="アナフィラキシーショックの死亡原因 - 驚異のアニヲタ社会復帰の予備" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> https://cdn-ak.d.st-hatena.com/diary/MikuHatsune/2014-11-14.png Hatena Blog https://hatena.blog 2014-11-14 21:49:42 rich https://mikuhatsune.hatenadiary.com/entry/20141114/1415969382 1.0 100%