Computes InterQuartile Range, Maximum-Minimum, Standard Deviation and Median Absolute Deviation of the Ensemble Members
Computes the InterQuartile Range, the Maximum minus Mininum, the Standard
Deviation and the Median Absolute Deviation along the list of dimensions
provided by the posdim argument (typically along the ensemble member and
start date dimension).
The confidence interval is optionally computed by bootstrapping.
Spread(var, posdim = 2, narm = TRUE, siglev = 0.95, conf = TRUE)
var |
Matrix of any number of dimensions up to 10. |
posdim |
List of dimensions along which to compute IQR/MaxMin/SD/MAD. |
narm |
TRUE/FALSE if NA removed/kept for computation. Default = TRUE. |
siglev |
Confidence level of the computed confidence interval. 0.95 by default. |
conf |
Whether to compute the confidence intervals or not. TRUE by default. |
Example:
——–
To compute IQR, Max-Min, SD & MAD accross the members and start dates of
var output from Load()
or Ano()
or Ano_CrossValid()
,
call:
spread(var, posdim = c(2, 3), narm = TRUE)
Matrix with the same dimensions as var except along the first posdim
dimension which is replaced by a length 1 or 3 dimension, corresponding to
the lower limit of the siglev
% confidence interval
(only present if conf = TRUE
), the spread, and the upper limit of
the siglev
% confidence interval (only present if conf = TRUE
)
for each experiment/leadtime/latitude/longitude.
$iqr |
InterQuartile Range. |
$maxmin |
Maximum - Minimum. |
$sd |
Standard Deviation. |
$mad |
Median Absolute Deviation. |
History:
0.1 - 2011-03 (V. Guemas, virginie.guemas@ic3.cat) - Original code
1.0 - 2013-09 (N. Manubens, nicolau.manubens@ic3.cat) - Formatting to CRAN
# Load sample data as in Load() example: example(Load) clim <- Clim(sampleData$mod, sampleData$obs) ano_exp <- Ano(sampleData$mod, clim$clim_exp) runmean_months <- 12 dim_to_smooth <- 4 # Smooth along lead-times smooth_ano_exp <- Smoothing(ano_exp, runmean_months, dim_to_smooth) smooth_ano_exp_m_sub <- smooth_ano_exp - InsertDim(Mean1Dim(smooth_ano_exp, 2, narm = TRUE), 2, dim(smooth_ano_exp)[2]) spread <- Spread(smooth_ano_exp_m_sub, c(2, 3)) PlotVsLTime(spread$iqr, toptitle = "Inter-Quartile Range between ensemble members", ytitle = "K", monini = 11, limits = NULL, listexp = c('CMIP5 IC3'), listobs = c('ERSST'), biglab = FALSE, hlines = c(0), fileout = 'tos_iqr.eps') PlotVsLTime(spread$maxmin, toptitle = "Maximum minus minimum of the members", ytitle = "K", monini = 11, limits = NULL, listexp = c('CMIP5 IC3'), listobs = c('ERSST'), biglab = FALSE, hlines = c(0), fileout = 'tos_maxmin.eps') PlotVsLTime(spread$sd, toptitle = "Standard deviation of the members", ytitle = "K", monini = 11, limits = NULL, listexp = c('CMIP5 IC3'), listobs = c('ERSST'), biglab = FALSE, hlines = c(0), fileout = 'tos_sd.eps') PlotVsLTime(spread$mad, toptitle = "Median Absolute Deviation of the members", ytitle = "K", monini = 11, limits = NULL, listexp = c('CMIP5 IC3'), listobs = c('ERSST'), biglab = FALSE, hlines = c(0), fileout = 'tos_mad.eps')
Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.