+
+# getNoNA2
+#
+# Get indices in data of no-NA series preceded by no-NA, within [first,last] range.
+#
+# @inheritParams dateIndexToInteger
+# @param first First index (included)
+# @param last Last index (included)
+#
+.getNoNA2 = function(data, first, last)
+{
+ (first:last)[ sapply(first:last, function(i)
+ !any( is.na(data$getSerie(i-1)) | is.na(data$getSerie(i)) )
+ ) ]
+}