- ref_var = c( apply(data$getSeries(fil$neighb_indices),1,sd),
- apply(data$getSeries(fil$neighb_indices+1),1,sd) )
- fdays = getNoNA2(data, 1, fil$index-1)
- global_var = c( apply(data$getSeries(fdays),1,sd), apply(data$getSeries(fdays+1),1,sd) )
+ ref_var = c( apply(data$getSeries(fil$neighb_indices-1),1,sd),
+ apply(data$getSeries(fil$neighb_indices),1,sd) )
+ tdays = .getNoNA2(data, 2, fil$index)
+ global_var = c(
+ apply(data$getSeries(tdays-1),1,sd),
+ apply(data$getSeries(tdays),1,sd) )