SeasOpts {seas} | R Documentation |
Set default options for seas.
setSeasOpts()
setSeasOpts
sets all the default values for options in
seas, and at some point it may support arguments for styles,
such as ‘black and white’. However, after the initial setting of
options, users may change the options to modify the look of graphics
produced in seas.
Other details of the graphics can be modified using
par
. This includes the font sizes, back-ground colour,
font family, and many others. For example, setting par(cex=0.75)
will reduce the font size in the active device by 75% of the
original size; while par(font.main=2)
will change only the font
for the main titles.
setSeasOpts()
only sets the options
in the current
environment, and returns nothing.
This is automatically done when seas is loaded (using
.First.lib
).
Here are all the supported options for seas, with the default
values shown for each option. Options are stored in
list
s, which make them easy to ‘get’, but
difficult to ‘set’, and is shown in the
Examples section at the bottom.
seas.main
:fmt
:name
and id
(if
available) as the first "%s"
, followed by a range of
years as the second "%s"
; these are formated by
sprintf
; "%s\n%s"
rngsep
:"-"
,
other alternatives could be " to "
show.id
:TRUE
show.fun
:TRUE
seas.label
:fmt
:"%s (%s)"
, other alternatives could be
"%s, %s"
monthday
:strftime
for format codes); this can be either
"%b %-d"
(for most Unix-like systems),
"%b %#d"
(for Windows systems), or "%b %d"
(for other systems); this should produce a string, such as
‘Aug 1’ for August 1stmonth
"%B"
seas.month.grid
:.seasmonthgrid
), which is common to
many plots that use a numeric
width
in
mkseas
:
abb
:TRUE
len
:1
; NULL
force
:mtext
, otherwise labels can be automatically placed
and adjusted for device using axis
; TRUE
label
:TRUE
col
:"lightgrey"
lwd
:par("lwd")
; 1
lty
:1
seas.bxp
:boxcol
:"lightgrey"
outcex
:par("cex")
; 1
seas.temp
:plot.seas.temp
(among other functions):
col
:c("lightgrey","red")
lwd
:plot.seas.temp
, multiplied by par("lwd")
;
3
seas.precip
:col
:"grey"
density
:NULL
angle
:45
lwd
:par("lwd")
; 1
seas.rain
:col
:"lightblue"
density
:NULL
angle
:45
lwd
:par("lwd")
; 1
seas.snow
:col
:"lightgrey"
density
:NULL
angle
:-45
lwd
:par("lwd")
; 1
seas.interarrival
:plot.interarrival
;
organized as c(wet,dry)
:
col
:c("lightblue","orange")
seas.median
:median
lines in image.seas.sum
:
col
:"red"
lwd
:par("lwd")
; 1
lty
:1
seas.mean
:mean
lines in image.seas.sum
:
col
:"red"
lwd
:par("lwd")
; 1
lty
:1
seas.na
:NA
or missing values in various plots:
col
:"red"
pch
:"x"
M.W. Toews
if(is.null(getOption("seas.main"))) setSeasOpts() # Modify an option getOption("seas.main")$show.id cp <- orig <- getOption("seas.main") cp$show.id <- FALSE options(seas.main=cp) getOption("seas.main")$show.id options(seas.main=orig)