In a deseperate bid to dispose of Courier and improve the lifetime of my keyboard I'd like to SetOptions for all Plots for BaseStyle, but I can't get anything to work. This is as far as I got before I started typing everything by hand:
ReleaseHold /@
Map[HoldComplete@
SetOptions[#,
BaseStyle -> {FontFamily -> "Helvetica", FontSize -> 12,
FontWeight -> "Bold", FontColor -> RGBColor[.2, .55, .7]}] &,
Names["System`*Plot"]]
Any help would be gladly appreciated!
