特異点と不連続点のタイプの特定
関数中のさまざまなタイプの特異点と不連続点をハイライトする．
In[1]:=
options =
Sequence @@ {ExclusionsStyle -> Dashed, PlotTheme -> "Minimal",
ImageSize -> 400, PlotRange -> {-7, 8}};
Plot[Callout[
Floor[x] + Tan[x], {"pole",
"piecewise jump"}, {{3 Pi/8, -3}, {2.5, 3}}, {{Pi/2, -2}, {3,
2.3}}, LabelStyle -> Medium], {x, 0, Pi}, Evaluate@options]Out[1]=
削除する除外タイプを指定する．
In[2]:=
Grid[Partition[{
Plot[Floor[x] Tan[x], {x, 0, 2 Pi}, ImageSize -> 250,
Exclusions -> "Discontinuities", PlotLabel -> "Discontinuities"],
Plot[Floor[x] Tan[x], {x, 0, 2 Pi}, ImageSize -> 250,
Exclusions -> "Singularities", PlotLabel -> "Singularities"]}, 2]]Out[2]=
