グラフィックス関数のオプションとして使われ,グラフィックスの主な部分が描画された後に描くグラフィックスプリミティブのリストを指定する.
Epilog
グラフィックス関数のオプションとして使われ,グラフィックスの主な部分が描画された後に描くグラフィックスプリミティブのリストを指定する.
詳細
- 3Dグラフィックスにおいて,2DグラフィックスプリミティブをEpilogオプションで指定することができる.グラフィックスプリミティブは,0,1座標系で描かれる.
例題
すべて開く すべて閉じる例 (2)
data = Table[{i, RandomReal[i]}, {i, 10}];ListLinePlot[data, Epilog -> {PointSize[Medium], Point[data]}, InterpolationOrder -> 2]SphericalPlot3D[ϕ, {θ, 0, Pi}, {ϕ, 0, 3Pi}, Epilog -> Inset[Framed[Style["Spiral", 20], Background -> LightYellow], {Right, Bottom}, {Right, Bottom}]]スコープ (2)
2DグラフィックスのEpilogでは通常の座標系が使われている:
Table[Graphics[{Pink, Disk[{0, 0}, 10]}, Axes -> True, Epilog -> Disk[p, 2]], {p, {{-5, -5}, {0, 0}, {5, 5}}}]3DグラフィックスのEpilogではスケールされた0,1座標系が使われている:
Table[Graphics3D[Sphere[{0, 0, 0}, 10], Epilog -> Disk[p, .1]], {p, {{.2, .2}, {.5, .5}, {.8, .8}}}]アプリケーション (3)
補間されたプロットの上にサンプル点とそれを繋ぐ線を表示する:
data = Table[{i, RandomReal[i]}, {i, 10}];ListLinePlot[data, Epilog -> {Green, Line[data], PointSize[Medium], Red, Point[data]}, InterpolationOrder -> 2]ListLinePlot[{data, data}, InterpolationOrder -> {2, 1}, PlotStyle -> {Automatic, Green}, Mesh -> Full, MeshStyle -> Directive[PointSize[Medium], Red]]{f, g} = {27 x + 130, -12 - 58 x + x^2 + x^3};Plot[{f, g}, {x, -10, 10}, Epilog -> {PointSize[Large], (Point[{#, f /. x -> #}]&) /@ (x /. NSolve[f == g, x])}]あるいは,MeshFunctionsを使って交点を求める:
Plot[{f, g}, {x, -10, 10}, MeshFunctions -> {(f - g) /. x -> #&}, Mesh -> {{0}}, MeshStyle -> PointSize[Large]]watermark = Style["Watermark", 36, Bold, FontFamily -> "Helvetica", Opacity[.3]];SphericalPlot3D[ϕ, {θ, 0, Pi}, {ϕ, 0, 3Pi}, Mesh -> None, PlotStyle -> Directive[Specularity[White, 50], Yellow], Epilog -> Inset[watermark, Automatic, Automatic, Automatic, {1, 1}]]特性と関係 (3)
Epilog中のオブジェクトはPlotRangeの計算には含まれない:
Graphics[{Pink, Disk[]}, Epilog -> Circle[{0, 1}], Frame -> True]Graphics[{Pink, Disk[]}, Axes -> True]Epilog中のオブジェクトは,座標軸を含めたグラフィックスの上に描かれる:
Graphics[{Pink, Disk[]}, Axes -> True, Epilog -> {Blue, Disk[{0, 0}, .4]}]プロット関数では,PlotRangeClippingはデフォルトでEpilogを含むグラフィックスを切り取る:
Plot[2Sin[x], {x, 0, 10}, Epilog -> Circle[], AspectRatio -> Automatic]PlotRangeClippingをFalseにすると,グラフィックスがプロット範囲の外側まで描かれる:
Plot[2Sin[x], {x, 0, 10}, Epilog -> Circle[], PlotRangeClipping -> False, AspectRatio -> Automatic]テクニカルノート
関連するガイド
履歴
1991 で導入 (2.0)
テキスト
Wolfram Research (1991), Epilog, Wolfram言語関数, https://reference.wolfram.com/language/ref/Epilog.html.
CMS
Wolfram Language. 1991. "Epilog." Wolfram Language & System Documentation Center. Wolfram Research. https://reference.wolfram.com/language/ref/Epilog.html.
APA
Wolfram Language. (1991). Epilog. Wolfram Language & System Documentation Center. Retrieved from https://reference.wolfram.com/language/ref/Epilog.html
BibTeX
@misc{reference.wolfram_2026_epilog, author="Wolfram Research", title="{Epilog}", year="1991", howpublished="\url{https://reference.wolfram.com/language/ref/Epilog.html}", note=[Accessed: 06-September-2026]}
BibLaTeX
@online{reference.wolfram_2026_epilog, organization={Wolfram Research}, title={Epilog}, year={1991}, url={https://reference.wolfram.com/language/ref/Epilog.html}, note=[Accessed: 06-September-2026]}