# NOT RUN {
# }
# NOT RUN {
# note: don't run this in your main directory--make a copy in case something goes wrong
mydir <- "C:/Simple"
## retrospective analyses
SS_doRetro(masterdir=mydir, oldsubdir="", newsubdir="retrospectives", years=0:-5)
retroModels <- SSgetoutput(dirvec=file.path(mydir, "retrospectives",paste("retro",0:-5,sep="")))
retroSummary <- SSsummarize(retroModels)
endyrvec <- retroSummary$endyrs + 0:-5
SSplotComparisons(retroSummary, endyrvec=endyrvec, legendlabels=paste("Data",0:-5,"years"))
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab