$\mathrm{restart}\:$

$\mathrm{with}\left(\mathrm{plots}\right)\:$

$A≔\mathrm{Array}\left(1..2\right)\:$

$A_1≔\mathrm{plot}\left(\left[\mathrm{seq}\left(\mathrm{BesselJ}\left(n\, x\right)\, n\=1..4\right)\right]\, x\=0..10\right)\:$

$A_2≔\mathrm{plot}\left(\left[\mathrm{seq}\left(\mathrm{BesselJ}\left(n\, x\right)\, n\=1..4\right)\right]\, x\=0..10\, \mathrm{filled}\right)\:$

$\mathrm{display}\left(\mathrm{A}\right)$

$P ≔ \mathrm{Array}\left(1..2\, 1..2\right)\:$

$P_{1\,1}≔\mathrm{Student}:-\mathrm{Calculus1}:-\mathrm{VolumeOfRevolution}\left(\cos \left(x\right)\+3\,\sin \left(x\right)\+2\,x\=0..4\mathrm{\π}\,\mathrm{output}\=\mathrm{plot}\, \mathrm{caption}\=''''\right)\:$

$P_{1\,2}≔\mathrm{plot3d}\left(\left[1\,x\,y\right]\,x\=0..2\cdot \mathrm{Pi}\,y\=0..2\cdot \mathrm{Pi}\,\mathrm{coords}\=\mathrm{toroidal}\left(10\right)\, \mathrm{scaling}\=\mathrm{constrained}\right)\:$

$P_{2\,1}≔\mathrm{plot3d}\left(x\*\exp \left(-x\^2-y\^2\right)\, x\=-2..2\, y\=-2..2\, \mathrm{color}\=x\, \mathrm{orientation}\=\left[30\,70\,-40\right]\right)\:$

$P_{2\,2} ≔ \mathrm{plot3d}\left(\sin \left(xy\right)\,x\=- \mathrm{\π}..\mathrm{\π}\,y\=-\mathrm{\π}..\mathrm{\π}\, \mathrm{scaling}\=\mathrm{constrained}\, \mathrm{color}\=''SteelBlue''\right)\:$

$\mathrm{display}\left(P\right)$

$V ≔ \mathrm{Array}\left(1..2\, 1..2\right)\:$

$V_{1\,1} ≔\mathrm{plot}\left(\frac{1}{x}\, \mathrm{discont}\right)\:$

$V_{1\,2} ≔ \mathrm{plot}\left(\left[\tan \left(x\right)\, \cos \left(x\right)\, x\=0..2 \cdot \mathrm{Pi}\right]\, \mathrm{discont}\, \mathrm{color}\=''Niagara\_Navy''\right)\:$

$V_{2\,1} ≔ \mathrm{plot}\left(\left\{\sin \, \cos \, \tan \, \csc \, \sec \, \cot \right\}\, \mathrm{discont}\right)\:$

$V_{2\,2} ≔ \mathrm{plot}\left(\frac{\ln \left(x^2\right)}{\left(x^2-2\right)}\, \mathrm{discont}\right)\:$

$\mathrm{display}\left(V\right)\;$

$\mathrm{with}\left(\mathrm{plottools}\right)\:$

$T ≔ \mathrm{Array}\left(1..2\, 1..2\right)\:$

$T_{1\,1} ≔ \mathrm{display}\left(\mathrm{prism}\left(\mathrm{disk}\left(\left[0\,0\right]\, \mathrm{color}\=''Niagara\_LeafGreen''\, \mathrm{transparency}\=0.3\right)\right)\,\mathrm{scaling}\=\mathrm{constrained}\right)\:$

$T_{1\,2} ≔ \mathrm{display}\left(\mathrm{prism}\left(\mathrm{sector}\left(\left[0\,0\right]\,2\,\frac{3\mathrm{\pi }}{4}..\frac{5\mathrm{\pi }}{4}\,\mathrm{color}\=''Niagara\_Violet''\right)\,\mathrm{base}\=0.5\, \mathrm{transparency}\=0.4\right)\, \mathrm{scaling}\=\mathrm{constrained}\, \mathrm{orientation}\=\left[45\,45\,30\right]\right)\:$

$T_{2\,1 }≔ \mathrm{display}\left(\left[\mathrm{annulus}\left(2..3\,\mathrm{color}\=''Niagara\_GreenishBlue''\right)\, \mathrm{annulus}\left(1..2\, \mathrm{color}\=''Niagara\_BlueGreen''\right)\right]\, \mathrm{axes}\=\mathrm{boxed}\, \mathrm{scaling}\=\mathrm{constrained}\right)\:$

$T_{2\,2} ≔ \mathrm{display}\left(\mathrm{sector}\left(\left[0\,0\right]\,5\,0..\frac{\mathrm{Pi}}{3}\,\mathrm{color}\=''Niagara\_Burgundy''\, \mathrm{transparency}\=0.5\right)\, \mathrm{axiscoordinates}\=\mathrm{polar}\, \mathrm{coordinateview}\=\left[0..5\, 0..\frac{\mathrm{Pi}}{2}\right]\right)\:$

$\mathrm{display}\left(T\right)\;$

$\mathrm{ColorTools}:-\mathrm{GetPalette}\left(''Niagara''\right)\;$

$\left(Palette\; Niagara:BurgundyNavyLeafGreenAzurePurpleBlueGreenVioletDeepBlueCinnamonPaleRedGreenishBlueDarkRoseBluishGreenDarkOrchidBluishPurpleOlive\right)$

$p≔\mathrm{plot}\left(\left[\mathrm{seq}\left(\sin \left(x-i\/6\*\mathrm{Pi}\right)\, i\=1..6\right)\right]\, x\=-\mathrm{Pi}..\mathrm{Pi}\, \mathrm{thickness}\=2\, \mathrm{axes}\=\mathrm{box}\, \mathrm{legend}\=\left[\mathrm{seq}\left(i\,i\=1..6\right)\right]\, \mathrm{title}\=''Niagara\; Palette''\right)\:$

$$\begin{gathered} \mathrm{plots}:-\mathrm{setcolors}\left(''Spring''\right)\: \\ q ≔\mathrm{plot}\left(\left[\mathrm{seq}\left(\sin \left(x-i\/6\*\mathrm{Pi}\right)\, i\=1..6\right)\right]\, x\=-\mathrm{Pi}..\mathrm{Pi}\, \mathrm{thickness}\=2\, \mathrm{axes}\=\mathrm{box}\, \mathrm{legend}\=\left[\mathrm{seq}\left(i\,i\=1..6\right)\right]\, \mathrm{title}\=''Spring\; Palette''\right)\: \\ \mathrm{plots}:-\mathrm{setcolors}\left(''default''\right)\: \end{gathered}$$

$\mathrm{plots}:-\mathrm{display}\left(\mathrm{Array}\left(\left[p\,q\right]\right)\right)$

A new Live Data Plots palette giving instant access to eight new task templates.

Major improvements to the Statistics:-PieChart command.

A new Statistics:-ScatterPlot3D command to produce a scatter plot and a smoothed approximation for a given dataset.