ListAnimate[{expr1,expr2,…}]
フレームが連続する expriであるアニメーションを生成する.
ListAnimate[list,fps]
1秒間に fps 個のフレームを描画する.
ListAnimate
ListAnimate[{expr1,expr2,…}]
フレームが連続する expriであるアニメーションを生成する.
ListAnimate[list,fps]
1秒間に fps 個のフレームを描画する.
詳細とオプション
- expriはいかなる式でもよく,グラフィックスである必要はない.
- ListAnimateはAnimatorを含むManipulateオブジェクトを生成する.
- 特に指定されていない場合は,デフォルトでアニメーションが合計5秒間持続するような fps が選ばれる.
- ListAnimateはManipulateのオプションに以下の追加・変更を加えたものが使える. [全オプションのリスト]
-
Alignment Automatic 表示エリアでオブジェクトをどのように並べるか AnimationDirection Forward アニメーションの方向 AnimationRepetitions Infinity 停止までに何回実行するか AnimationRunTime 0 アニメーションの実行が始まってからの経過時間.アニメーションが実行中でなければ0になる AnimationTimeIndex Automatic アニメーションの時間指標.始まりは0,終りはDefaultDurationの値 AppearanceElements Automatic 含めるコントロール要素 DefaultDuration 5. デフォルトの継続時間(秒) DisplayAllSteps True すべての expriを強制的に表示するかどうか ImageSize All 使用する全体的な画像の大きさ - ListAnimateはデフォルトで,いかなる expriも描画できるだけの大きさのエリアに表示する.
- オプション設定がImageSize->Automaticのときは,ListAnimateは現在表示されている expri分のスペースしか残さない.
- "ProgressSlider","PlayPauseButton","FasterSlowerButtons","DirectionButton"の要素がデフォルトで含まれる.これらの要素はAppearanceElementsの設定値としてリストの中で任意の順序で指定することができる.
全オプションのリスト
例題
すべて開く すべて閉じる例 (1)
スコープ (4)
ListAnimateのコンテンツ (3)
ListAnimate[{Style["", Large], "string", Framed[x + y], Graphics[Rectangle[], ImageSize -> 20]}]ListAnimate[Table[Factor[x ^ n - 1], {n, 15}]]ListAnimate[Table[Pane[Factor[x ^ n - 1], 200], {n, 50}]]TimeSeriesをアニメーションにする:
ts = CountryData["UnitedStates", {"Population", {1970, 2014}}]ListAnimate[ts]オプション (19)
Alignment (1)
AnimationDirection (1)
AnimationRate (1)
AnimationRepetitions (1)
AnimationRunning (2)
デフォルトで,ListAnimateは評価されたときに実行し始める:
ListAnimate[{1, 2, 3}]AnimationRunning->Falseと設定すると,ListAnimateは休止状態で始まる:
ListAnimate[{1, 2, 3}, AnimationRunning -> False]AppearanceElements (2)
デフォルトで,ListAnimateはAnimatorしか含んでいない:
ListAnimate[{1, 2, 3}, AnimationRunning -> False]AppearanceElementsを使って追加的なコントロールを入れることができる:
Table[ListAnimate[{1, 2, 3}, AppearanceElements -> a, AnimationRunning -> False], {a, {"HideControlsButton", "SnapshotButton", "ResetButton", "UpdateButton", All}}]ControlPlacement (1)
DefaultDuration (1)
Deployed (2)
ListAnimate[Table[Graphics[Disk[]], {3}], AnimationRunning -> False]Deployedを使ってコンテンツのインタラクティブ性を制限できる:
ListAnimate[Table[Graphics[Disk[]], {3}], Deployed -> True, AnimationRunning -> False]FrameMargins (2)
ImageMargins (2)
ImageSize (3)
デフォルトで,ListAnimateはコンテンツに十分なスペースを取ってありサイズ調整の必要はない:
ListAnimate[Table[Graphics[Circle[], ImageSize -> s], {s, 20, 50, 10}], AnimationRunning -> False]ImageSizeを設定すると,現行の表示に十分なだけのスペースが取られる:
ListAnimate[Table[Graphics[Circle[], ImageSize -> s], {s, 20, 50, 10}], ImageSize -> Automatic, AnimationRunning -> False]ListAnimate[Table[Graphics[Circle[], ImageSize -> s], {s, 20, 50, 10}], ImageSize -> {300, 100}, AnimationRunning -> False]アプリケーション (4)
{sol, {steps}} = Reap[FindMinimum[(x - 1) ^ 2 + 100(y - x ^ 2) ^ 2, {{x, -1}, {y, 1}}, StepMonitor :> Sow[{x, y}]]]ListAnimate[Table[ListLinePlot[Take[steps, i], Mesh -> All, PlotRange -> {{-1, 1.1}, {-1, 1.1}}], {i, Length[steps]}]]正弦Gordonの偏微分方程式を解く際の個々のステップを集める:
{sol, {steps}} = Reap@NDSolve[{Subscript[∂, t, t]u[t, x] == Subscript[∂, x, x]u[t, x] + Sin[u[t, x]] , u[0, x] == E^-x^2, u^(1, 0)[0, x] == 0, u[t, -10] == u[t, 10]}, u, {t, 0, 8}, {x, -10, 10}, StepMonitor :> Sow[Plot[u[t, x], {x, -10, 10}, PlotRange -> {0, 8}]]];//QuietListAnimate[steps]中間ステップすべてでSowを使うLU分解の実装:
LU[A_] :=
Module[{m, n, L, U}, {m, n} = Dimensions[A];
L = IdentityMatrix[n]; Sow[L, "L" ];
U = A; Sow[U, "U"];
Do[
L[[k ;; n, k]] = U[[k ;; n, k]] / U[[k, k]]; Sow[L, "L"];
U[[(k + 1) ;; n, k ;; n]] = U[[(k + 1) ;; n, k ;; n]] - L[[(k + 1) ;; n, {k}]].U[[{k}, k ;; n]]; Sow[U, "U"];
, {k, 1, n - 1}];
{L, U}
];中間結果を収穫(Reap)し,アニメーションを作る:
LUAnimate[A_, f_] :=
Module[ {lu, l, u},
{lu, {{l}, {u}}} = Reap[ LU[ A ], {"L", "U"}];
ListAnimate[Table[Row[{f[l[[i]]], ".", f[u[[i]]], "==", f[A]}], {i, Length[l]}]]
]LUAnimate[RandomInteger[{1, 10}, {5, 5}], MatrixForm]より大きい行列にMatrixPlotを使う:
LUAnimate[RandomInteger[{1, 10}, {20, 20}], MatrixPlot[#, FrameTicks -> None, ImageSize -> 100]&]dates = DateRange[DateObject[{2014, 1, 1, 12}], DateObject[{2014, 1, 31, 12}], 1];mp = MoonPhase[dates, "Icon"];
sf = MoonPhase[dates, "Fraction"];TimeSeriesThreadを使って,アイコンと分数からなるベクトル値を持つTimeSeriesを作る.次に時系列を再スケールし,タイムスタンプを整数にする:
moon = TimeSeriesRescale[TimeSeriesThread[#&, {mp, sf}], {1, 31, 1}];TimeSeriesMapThreadを使って,勾配背景を持つラベル付きの画像の列を作る:
ts = TimeSeriesMapThread[Framed[Labeled[ImageResize[First[#2], 45], Style[#1, Bold, FontFamily -> "Helvetica"]], Background -> Lighter[ColorData["StarryNightColors", Last[#2]], .3]]&, moon];ListAnimate[ts]特性と関係 (3)
ListAnimateを使ってTableの出力をアニメーションにする:
ListAnimate[Table[Plot[BesselJ[n, x], {x, 0, 10}], {n, 5}], AnimationRunning -> False]パラメータに依存するアニメーションにAnimateを使う:
Animate[Plot[BesselJ[n, x], {x, 0, 10}, PlotRange -> 0.7], {n, 1, 5, 1}, AnimationRunning -> False]カスタマイズしたアニメーションフレームの組立てにAnimatorを使う:
Column[{Animator[Dynamic[t], {0, 1}], Dynamic@Plot[Sinc[t x], {x, 0, 10}, PlotRange -> 1]}]関連するガイド
関連するワークフロー
- アニメーションをWebに配備する
テキスト
Wolfram Research (2007), ListAnimate, Wolfram言語関数, https://reference.wolfram.com/language/ref/ListAnimate.html (2014年に更新).
CMS
Wolfram Language. 2007. "ListAnimate." Wolfram Language & System Documentation Center. Wolfram Research. Last Modified 2014. https://reference.wolfram.com/language/ref/ListAnimate.html.
APA
Wolfram Language. (2007). ListAnimate. Wolfram Language & System Documentation Center. Retrieved from https://reference.wolfram.com/language/ref/ListAnimate.html
BibTeX
@misc{reference.wolfram_2026_listanimate, author="Wolfram Research", title="{ListAnimate}", year="2014", howpublished="\url{https://reference.wolfram.com/language/ref/ListAnimate.html}", note=[Accessed: 01-November-2026]}
BibLaTeX
@online{reference.wolfram_2026_listanimate, organization={Wolfram Research}, title={ListAnimate}, year={2014}, url={https://reference.wolfram.com/language/ref/ListAnimate.html}, note=[Accessed: 01-November-2026]}