例 2 ステップを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]})};出力なし - このステップは次のステップの準備をします。
Plot[{Sin[x], Cos[x], Tan[x]}, {x, 0, 2π}, ImageSize -> 400, PlotLegends -> LineLegend["Expressions", LabelStyle -> {Gray, Bold, 18}], Evaluate@styleoptions]-Graphics-