You can set all sorts of options to Graphics
using the SetOptions
command:
SetOptions[Graphics,
BaseStyle -> {FontFamily -> "Helvetica", FontSize -> 16},
AxesStyle -> Directive[Red, Thick]]
The output from this command will show you some other options that you can set. Here I've just set the font style and axes style; FrameStyle
can be added as you wish.
(*{AlignmentPoint -> Center, AspectRatio -> Automatic, Axes -> False,
AxesLabel -> None, AxesOrigin -> Automatic,
AxesStyle -> Directive[RGBColor[1, 0, 0], Thickness[Large]],
Background -> None, BaselinePosition -> Automatic,
BaseStyle -> {FontFamily -> "Helvetica", FontSize -> 16},
ColorOutput -> Automatic, ContentSelectable -> Automatic,
CoordinatesToolOptions -> Automatic,
DisplayFunction :> $DisplayFunction, Epilog -> {},
FormatType :> ( ##1 &), Frame -> False, FrameLabel -> None,
FrameStyle -> {}, FrameTicks -> Automatic, FrameTicksStyle -> {},
GridLines -> None, GridLinesStyle -> {}, ImageMargins -> 0.,
ImagePadding -> All, ImageSize -> Automatic,
ImageSizeRaw -> Automatic, LabelStyle -> {}, Method -> Automatic,
PlotLabel -> None, PlotRange -> All, PlotRangeClipping -> False,
PlotRangePadding -> Automatic, PlotRegion -> Automatic,
PreserveImageOptions -> Automatic, Prolog -> {}, RotateLabel -> True,
Ticks -> Automatic, TicksStyle -> {}} *)
This shows that it works:
Graphics[Text["this is a test", {0.5, 0.5}], Axes -> True,
ImageSize -> 150]
