Description Usage Arguments Aesthetics Author(s) References See Also Examples
This function will create polygons between two lines. If given a
temperature and theshold time series, like that produced by detect,
the output will meet the specifications of Hobday et al. (2016) shown as
'flame polygons.' If one wishes to plot polygons below a given threshold, and not
above, switch the values being fed to the y and y2
aesthetics. This function differs in use from event_line
in that it must be created as a ggplot 'geom' object. The benefit
of this being that one may add additional information to the figure as geom
layers to ggplot2 graphs as may be necessary.
1 2 3 |
mapping |
Set of aesthetic mappings created by |
data |
The data to be displayed in this layer. There are three options: If NULL, the default, the data is inherited from the plot data as specified
in the call to A data.frame, or other object, will override the plot data. All objects will
be fortified to produce a data frame. See A function will be called with a single argument, the plot data. The return
value must be a |
stat |
The statistical transformation to use on the data for this layer, as a string. |
position |
Position adjustment, either as a string, or the result of a call to a position adjustment function. |
... |
other arguments passed on to |
na.rm |
If |
show.legend |
Logical. Should this layer be included in the legends? |
inherit.aes |
If |
geom_flame understands the following aesthetics (required aesthetics
are in bold):
x
y
y2
colour
fill
size
alpha
linetype
Robert W. Schlegel
Hobday, A.J. et al. (2016), A hierarchical approach to defining marine heatwaves, Progress in Oceanography, 141, pp. 227-238, doi: 10.1016/j.pocean.2015.12.014
event_line for a non-ggplot2 based flame function.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 | ts_dat <- make_whole(sst_WA)
res <- detect(ts_dat, climatology_start = "1983-01-01",
climatology_end = "2012-12-31")
mhw <- res$clim
mhw <- mhw[10580:10690,]
## Not run:
require(ggplot2)
ggplot(mhw, aes(x = t, y = temp)) +
geom_flame(aes(y2 = thresh_clim_year)) +
geom_text(aes(x = as.Date("2011-02-01"), y = 28,
label = "That's not a heatwave.\nThis, is a heatwave.")) +
xlab("Date") + ylab(expression(paste("Temperature [", degree, "C]")))
## End(Not run)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.