ファイル:Graph SIR model without vital dynamics.svg

元のファイル (SVG ファイル、964 × 723 ピクセル、ファイルサイズ: 206キロバイト)

概要

解説
English: Basic SIR system:

dS/dt = -βIS/N dI/dt = βIS/N-γI dR/dt = γI

Initial Conditions: S(0)=3000000, I(0)=1, R(0)=0

Parameters: β=0.001, γ=0.07, N=3400000, t∈[0,60], step size=0.5

Yellow → Susceptible, Maroon → Infectious, Teal → Recovered
日付
原典 File:Sirsys-p9.png
作者 Bye~commonswiki
Clear[IC, a, b, h, i, m, n, f, NN, β, γ];
   IC = {3000000, 1, 0}; m = Length[IC];
   a = 0; b = 60; h = 0.5;
   NN = 1;
   n = (b - a)/h;

   β = 0.001; γ = 0.1;
   f[1, t_, S_, I_, R_] := -((β I S)/NN);
   f[2, t_, S_, I_, R_] := (β I S)/NN - γ I;
   f[3, t_, S_, I_, R_] := γ I;
   Clear[t, k1, k2, k3, k4, w];
   t[i_] := a + i*h;
   For[i = 1, i <= m, i++, w[i, 0] = IC[[i]]];
   k1[i_, j_] := h*(f @@ Flatten[{i, t[j - 1], Table[w[k, j - 1], {k, 1, m}]}]);
   k2[i_, j_] := h*(f @@ Flatten[{i, t[j - 1] + h/2, Table[w[k, j - 1] + k1[k, j]/2, {k, 1, m}]}]);
   k3[i_, j_] := h*(f @@ Flatten[{i, t[j - 1] + h/2, Table[w[k, j - 1] + k2[k, j]/2, {k, 1, m}]}]);
   k4[i_, j_] := h*(f @@ Flatten[{i, t[j - 1] + h, Table[w[k, j - 1] + k3[k, j], {k, 1, m}]}]);
   w[i_, j_] :=  w[i, j] = w[i, j - 1] + (k1[i, j] + 2*k2[i, j] + 2*k3[i, j] + k4[i, j])/6
   t1 = Table[Table[{t[j], w[i, j]}, {j, 0, n}], {i, 1, m}](*//TableForm*);
   DkYellow = RGBColor[.808, .808, .192];
   Teal = RGBColor[0, .5, .5];
   Maroon = RGBColor[.5, 0, 0];
   ListPlot[t1, PlotMarkers -> {Automatic, Scaled[0.01]}, PlotStyle -> {DkYellow, Maroon, Teal}, AspectRatio -> 420/560]

ライセンス

Creative Commons CC-Zero このファイルはクリエイティブ・コモンズ CC0 1.0 全世界 パブリック・ドメイン提供のもとで利用可能にされています。
ある作品に本コモンズ証を関連づけた者は、その作品について世界全地域において著作権法上認められる、その者が持つすべての権利(その作品に関する権利や隣接する権利を含む。)を、法令上認められる最大限の範囲で放棄して、パブリック・ドメインに提供しています。

この作品は、たとえ営利目的であっても、許可を得ずに複製、改変・翻案、配布、上演・演奏することが出来ます。

キャプション

このファイルの内容を1行で記述してください

このファイルに描写されている項目

題材

31 3 2020

ファイルの履歴

過去の版のファイルを表示するには、その版の日時をクリックしてください。

日付と時刻サムネイル寸法利用者コメント
現在の版2020年3月31日 (火) 23:462020年3月31日 (火) 23:46時点における版のサムネイル964 × 723 (206キロバイト)GregoryKaiserUploaded a work by https://commons.wikimedia.org/wiki/User:Bye~commonswiki from https://en.wikipedia.org/w/index.php?title=File:Sirsys-p9.png&gettingStartedReturn=true with UploadWizard

以下のページがこのファイルを使用しています:

グローバルなファイル使用状況

以下に挙げる他のウィキがこの画像を使っています:

メタデータ