Rótulos, cores e marcadores 

Rótulos, cores e marcadores são facilmente controlados via PlotTheme.

Rotule estilos.

mostre o input completo de Wolfram Languageoculte o input

In[1]:=

X Grid[Transpose@ Partition[ Table[Plot[Sinc[x], {x, 0 Pi, 3 Pi}, PlotLabel -> t, PlotTheme -> t], {t, {"BoldLabels", "ItalicLabels", "LargeLabels", "SmallLabels", "SansLabels", "SerifLabels", "AxisLabels"}}], 2], Spacings -> {1, 2}]

Out[1]=

Estilos de cores.

mostre o input completo de Wolfram Languageoculte o input

In[2]:=

X Grid[Partition[ Table[Plot[ Evaluate@Table[BesselJ[n, x], {n, 0, 5}], {x, 0 Pi, 3 Pi}, PlotLabel -> t, PlotTheme -> t], {t, {(*{"BackgroundColor",Hue[.2,.3,.8]}, "BoldColor","ClassicColor",*)"CoolColor", "DarkColor", "GrayColor", "NeonColor", "PastelColor", "RoyalColor", "VibrantColor", "WarmColor"}}], 3], Spacings -> {1, 2}]

Out[2]=

Estilos de marcadores.

mostre o input completo de Wolfram Languageoculte o input

In[3]:=

X Grid[{Table[ ListPlot[SeedRandom[3]; Table[Accumulate[RandomReal[{0, 1}, 10]], {3}], PlotLabel -> t, PlotTheme -> t], {t, {"PlotMarkers", "OpenMarkers"}}]}, Spacings -> 1]

Out[3]=