data(BlackAngler.lenmatdat)
BA.matlen <- MatCount(matdat=BlackAngler.lenmatdat,
fem.key=2,
mal.key=1,
stage.key=2,
season.key=c(5,7))
plot(BA.matlen[[2]],pred.50=35,pred.95=55,top.text="Males Rep Season")
Run the code above in your browser using DataLab