Qurak

Legend curves with their associated expressions

Ejemplo 2 pasos, ejecutados en orden en una sola sesión. Cada paso se ejecutó contra el motor y la salida de abajo es lo que produjo.

Paso 1
styleoptions = Sequence@@{BaseStyle -> {GrayLevel[0.5], AbsoluteThickness[1.5]}, Filling -> Axis, FillingStyle -> {1 -> Opacity[0.6, Hue[0.63, 0.5, 0.7]], 2 -> Opacity[0.6, Hue[0.25, 1, 0.6]], 3 -> Opacity[0.6, Hue[0.11, 0.75, 0.9]]}, PlotStyle -> (Directive[AbsoluteThickness[5], #]& /@ {Hue[0.63, 0.5, 0.7], Hue[0.25, 1, 0.6], Hue[0.11, 0.75, 0.9]})};

Sin salida - este paso prepara algo para el siguiente.

Paso 2
Plot[{Sin[x], Cos[x], Tan[x]}, {x, 0, 2π}, ImageSize -> 400, PlotLegends -> LineLegend["Expressions", LabelStyle -> {Gray, Bold, 18}], Evaluate@styleoptions]
Salida
-Graphics-

Funciones usadas

Recetas relacionadas

Todas las recetas · Referencia de funciones · Usar esto desde un cliente MCP