# NOT RUN {
# Load sample data as in Load() example:
example(Load)
anomalies <- Ano_CrossValid(sampleData$mod, sampleData$obs)
# }
# NOT RUN {
PlotAno(anomalies$ano_exp, anomalies$ano_obs, startDates,
toptitle = paste('anomalies'), ytitle = c('K', 'K', 'K'),
legends = 'ERSST', biglab = FALSE, fileout = 'tos_ano_crossvalid.eps')
# }
Run the code above in your browser using DataLab