## Dummy timeSeries with NAs entries
data <- matrix(sample(c(1:20, rep(NA,4))), ncol = 2)
s <- timeSeries(data, timeCalendar())
## Find the longest consecutive non-missing values
na.contiguous(s)
Run the code above in your browser using DataLab