expanding.max(x) expanding.min(x)
x <- fts() x.emax <- expanding.max(x) x.emin <- expanding.min(x)
Run the code above in your browser using DataLab