NAO to accept a single integer in parameter ftime_avg

Hi @aho,

I am using the function NAO using monthly data. I would like to get the result without any average on the ftime dimension but I get the error: Parameter 'ftime_avg' must be an integer vector.

library(s2dv)
exp <- array(rnorm(1620), dim = c(member = 2, sdate = 3, ftime = 5, lat = 6, lon = 9))
set.seed(2)
obs <- array(rnorm(1620), dim = c(member = 1, sdate = 3, ftime = 5, lat = 6, lon = 9))
lat <- seq(20, 80, length.out = 6)
lon <- seq(-80, 40, length.out = 9) 
nao <- NAO(exp = exp, obs = obs, lat = lat, lon = lon, ftime_avg = 1)

Do you think it could also work in this case?

I may also wrap this function with Apply to get the result for all the ftime provided in the inputs.

Thanks in advance,

Núria