함수를 그 영역에서 플롯
함수의 영역을 기호적으로 결정하고 그 위에 플롯합니다.
In[1]:=
f = Sqrt[x^3 - x]/(x^2 + 1)
Out[1]=
In[2]:=
domain = With[{f = f}, ImplicitRegion[FunctionDomain[{f}, x], x]]
Out[2]=
In[3]:=
Plot[f, Element[x, domain], PlotTheme -> "Scientific",
Filling -> Axis, ImageSize -> 400]
Out[3]=