Приклад 2 кроків, що виконуються по порядку в одній сесії. Кожен крок було виконано на рушії, і вивід нижче — те, що він дав.
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]})};Немає виводу — цей крок готує щось для наступного.
Plot[{Sin[x], Cos[x], Tan[x]}, {x, 0, 2π}, ImageSize -> 400, PlotLegends -> LineLegend["Expressions", LabelStyle -> {Gray, Bold, 18}], Evaluate@styleoptions]-Graphics-