# NOT RUN {
# Load sample data as in Load() example:
example(Load)
clim <- Clim(sampleData$mod, sampleData$obs)
ano_exp <- Ano(sampleData$mod, clim$clim_exp)
ano_obs <- Ano(sampleData$obs, clim$clim_obs)
ano_exp <- Reorder(ano_exp, c(1, 2, 4, 3))
ano_obs <- Reorder(ano_obs, c(1, 2, 4, 3))
# }
# NOT RUN {
PlotAno(ano_exp, ano_obs, startDates,
toptitle = 'Anomaly', ytitle = c('K', 'K', 'K'),
legends = 'ERSST', biglab = FALSE, fileout = 'tos_ano.png')
# }
Run the code above in your browser using DataLab