powered by
xtract.trace(GH, sel = 1, WIN = c(0, 1))
data(GH) x1 <- xtract.trace(GH, sel = 1, WIN = c(0, 1)) plot(x1, type='l')
Run the code above in your browser using DataLab