| New in Wolfram Mathematica 6: Automated Computational Aesthetics | ◄ previous | next ► | 
Automatic Visually Distinct Plot Markers
Mathematica 6 automatically picks visually distinct plot markers to distinguish different datasets.
| In[1]:=  | ListPlot[Table[BesselJ[n, x], {n, 4}, {x, 0, 15, .2}], 
 PlotMarkers -> Automatic, Joined -> True] | 
| Out[1]=  |  | 

