data(mscdata)
plot.year(mksub(mscdata,id=1108447))
plot.year(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