スキップしてメイン コンテンツに移動

投稿

4月, 2020の投稿を表示しています

PCR検査陽性者数と死亡者の合計(2020/3/1 ~ 2020/4/5)

厚生労働省で感染数が発表されている。 「新型コロナウイルス感染症の現在の状況と厚生労働省の対応について」 報道発表資料 3月  https://www.mhlw.go.jp/stf/houdou/houdou_list_202003.html 4月  https://www.mhlw.go.jp/stf/houdou/houdou_list_202004.html これの「PCR検査陽性者」「死亡者」の合計値を拾ってきた。 日付 PCR検査陽性者 死亡者 Mar01 239 5 Mar02 254 6 Mar03 268 6 Mar04 284 7 Mar05 317 7 Mar06 348 6 Mar07 407 6 Mar08 454 6 Mar09 487 7 Mar10 513 9 Mar11 567 12 Mar12 619 15 Mar13 674 19 Mar14 714 21 Mar15 777 22 Mar16 809 24 Mar17 824 28 Mar18 868 29 Mar19 907 31 Mar20 943 33 Mar21 996 35 Mar22 1046 36 Mar23 1089 41 Mar24 1128 42 Mar25 1193 43 Mar26 1292 45 Mar27 1387 46 Mar28 1499 49 Mar29 1693 52 Mar30 1866 54 Mar31 1953 56 Apr01 2178 57 Apr02 2381 60 Apr03 2617 63 Apr04 2935 69 Apr05 3271 70 この陽性者の数が指数関数的に増えているので $陽性者数 = a * b^{日数}$ と仮定し R で計算してみた。 > day<-c(1:36) > day  [1]  1  2  3  4  5  6  7  8  9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 [26] 26 27 28 29 30 31 32 33 34 35 36 > num<-c(239,254,268,284,317,3