powered by
data(ChinookKR) str(ChinookKR) head(ChinookKR) op <- par(mfrow=c(1,2),pch=19) plot(recruits~brood.year,data=ChinookKR,type="l") plot(recruits~spawners,data=ChinookKR) par(op)
Run the code above in your browser using DataLab