# NOT RUN {
data(mscdata)
year.plot(mksub(mscdata, id=1108447))
year.plot(mksub(mscdata, id=1108447,
start=as.Date("1975-08-01"),
end=as.Date("2004-07-31")),
start.day=as.Date("2000-08-01"))
# }
Run the code above in your browser using DataLab