我想知道是否有可能为Show []函数创建一个包含信息的变量。因此,我想在Show []中显示绘图的时间,我会在Show []中插入该变量来设置样式选项。
我想要这样的东西......
OPTIONS=
AxesOrigin -> Automatic,
LabelStyle -> Directive[14, Black, Bold, Italic],
ImageSize -> {450}
Show[
ListLinePlot[data],
OPTIONS
]
解决方案很简单,但我很绿。 :)
答案 0 :(得分:2)
OPTIONS = {AxesOrigin -> Automatic,
LabelStyle -> Directive[14, Red, Bold, Italic], ImageSize -> {450}}
Show[ListLinePlot[{1, 2, 3, 4, 5}], OPTIONS]
适合我。
答案 1 :(得分:0)
您可以使用Show
自动将$Post
应用于图形,例如
$Post := With[{opts = {
AxesOrigin -> Automatic,
LabelStyle -> Directive[14, Black, Bold, Italic],
ImageSize -> {250}}},
If[Head[#] === Graphics, Show[#, opts], #] &]
ListLinePlot[{1, 2, 3, 4, 5}]
将$Post
恢复为默认值:
$Post =.