updated R graph

fishfollower · Sep 12, 2016 · 09f67ed · 09f67ed
1 parent 4a52961
commit 09f67ed
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/SAM/R/plot.R b/SAM/R/plot.R
@@ -43,5 +43,6 @@ ssbplot<-function(fit,...){
 ##' @details ...
 ##' @export
 recplot<-function(fit,...){
-  .plotit("logR", ylab="Recruits", trans=exp,...)
+   lab<-paste("Recruits (age ", fit$conf$minAge, ")", sep="")
+  .plotit("logR", ylab=lab, trans=exp,...)
 }