File:Lotka-Volterra.svg
出典:ウィキメディア・コモンズ (Wikimedia Commons)
ナビゲーションに移動
検索に移動
この SVG ファイルのこの PNG プレビューのサイズ: 512 × 512 ピクセル. その他の解像度: 240 × 240 ピクセル | 480 × 480 ピクセル | 768 × 768 ピクセル | 1,024 × 1,024 ピクセル | 2,048 × 2,048 ピクセル。
元のファイル (SVG ファイル、512 × 512 ピクセル、ファイルサイズ: 432キロバイト)
ファイル情報
構造化データ
キャプション
概要
[編集]解説Lotka-Volterra.svg |
English: Phase portrait of Lotka-Volterra system. Mathematica code:
Italiano: Ritratto di fase del sistema Lotka-Volterra. Codice Mathematica:
tend = 40;
Needs["VectorFieldPlots`"]
Quiet@Manipulate[
right1 = (a - b y[t]) x[t];
right2 = (c x[t] - d) y[t];
Solutions =
Table[NDSolve[{x'[t] == right1, y'[t] == right2, x[0] == d/c,
y[0] == i}, {x[t], y[t]}, {t, 0, tend}], {i, a/b,
3, (3 - a/b)/10}];
plot1 =
ParametricPlot[Evaluate[{x[t], y[t]} /. Solutions], {t, 0, tend},
ImageSize -> {300, 300}, AxesOrigin -> {0, 0},
PlotStyle -> {{Blue, Thick}}];
plot2 =
Plot[Evaluate[{x[t], y[t]} /. Solutions[[-1]]], {t, 0, tend},
ImageSize -> {300, 300}];
plot3 = ListPlot[{{0, 0}, {d/c, a/b}}, PlotMarkers -> {Automatic}];
plot4 =
VectorFieldPlot[{right1, right2} /. {x[t] -> x, y[t] -> y}, {x, 0,
3}, {y, 0, 3}];
plotLeft =
Show[plot1, plot3, plot4, PlotRange -> {{0, 3}, {0, 3}},
AxesLabel -> {x, y}, Ticks -> None];
Row[{plotLeft, plot2}]
, {{a, 1}, 0, 5}, {{b, 1}, 0, 5}, {{c, 1}, 0, 5}, {{d, 1}, 0, 5}]
|
日付 | |
原典 | 投稿者自身による著作物 |
作者 | Wiso |
ライセンス
[編集]この作品の著作権者である私は、この作品を以下のライセンスで提供します。
この文書は、フリーソフトウェア財団発行のGNUフリー文書利用許諾書 (GNU Free Documentation License) 1.2またはそれ以降のバージョンの規約に基づき、複製や再配布、改変が許可されます。不可変更部分、表紙、背表紙はありません。このライセンスの複製は、GNUフリー文書利用許諾書という章に含まれています。http://www.gnu.org/copyleft/fdl.htmlGFDLGNU Free Documentation Licensetruetrue |
- あなたは以下の条件に従う場合に限り、自由に
- 共有 – 本作品を複製、頒布、展示、実演できます。
- 再構成 – 二次的著作物を作成できます。
- あなたの従うべき条件は以下の通りです。
- 表示 – あなたは適切なクレジットを表示し、ライセンスへのリンクを提供し、変更があったらその旨を示さなければなりません。これらは合理的であればどのような方法で行っても構いませんが、許諾者があなたやあなたの利用行為を支持していると示唆するような方法は除きます。
- 継承 – もしあなたがこの作品をリミックスしたり、改変したり、加工した場合には、あなたはあなたの貢献部分を元の作品とこれと同一または互換性があるライセンスの下に頒布しなければなりません。
あなたは上記のライセンスから、どれか一つ以上を選択できます。
ファイルの履歴
過去の版のファイルを表示するには、その版の日時をクリックしてください。
日付と時刻 | サムネイル | 寸法 | 利用者 | コメント | |
---|---|---|---|---|---|
現在の版 | 2008年5月29日 (木) 11:20 | 512 × 512 (432キロバイト) | Wiso (トーク | 投稿記録) | {{Information |Description= |Source= |Date= |Author= |Permission= |other_versions= }} | |
2008年5月29日 (木) 11:19 | 512 × 512 (344キロバイト) | Wiso (トーク | 投稿記録) | {{Information |Description= |Source= |Date= |Author= |Permission= |other_versions= }} | ||
2008年5月29日 (木) 10:48 | 512 × 512 (432キロバイト) | Wiso (トーク | 投稿記録) | {{Information |Description={{en|1=Phase portrait of Lotka-Volterra system. Mathematica code: tend = 40; Needs["VectorFieldPlots`"] Quiet@Manipulate[][t]) x[t]; right2 = (c x[t] - d) y[t]; Solutions = Table[][][t] == right1, y'[t] == right2, x[0] |
このファイルは上書きできません。
ファイルの使用状況
このファイルを使用しているページはありません。
グローバルなファイル使用状況
以下に挙げる他のウィキがこの画像を使っています:
- it.wikipedia.org での使用状況
- it.wikibooks.org での使用状況
- ja.wikipedia.org での使用状況
- uk.wikipedia.org での使用状況
- www.wikidata.org での使用状況