
Last chance! 50% off unlimited learning
Sale ends in
# NOT RUN {
x <- xts::xts(rnorm(1095, 100,1), seq.Date(as.Date("2009-01-01"), length.out=1095, by="days"))
a31 <- fill31(x)
a <- drop31(a31, 1, 365)
# }
Run the code above in your browser using DataLab