Nothing
#' @title Catch-at-age for Suwanee and Largemouth Bass.
#'
#' @description Catch-at-age for Suwanee (\emph{Micropterus notius}) and Largemouth Bass (\emph{Micropterus salmoides}) collected from several lakes in Florida, 2001-2002.
#'
#' @name BassFL
#'
#' @docType data
#'
#' @format A data frame with 39 observations on the following 5 variables.
#' \describe{
#' \item{species}{Species of bass (Suwanee and Largemouth)}
#' \item{loc}{Location (SantaFe, Wacissa, Withlacoochee, Ochlockonee)}
#' \item{year}{Year (2001, 2002)}
#' \item{num}{Number of fish captured}
#' \item{age}{Age of fish at capture}
#' }
#'
#' @section Topic(s):
#' \itemize{
#' \item Total mortality
#' \item Catch curve
#' }
#'
#' @concept Mortality
#' @concept Catch Curve
#'
#' @source From Figure 2 of Bonvechio, T.F., M.S. Allen, and R.L. Cailteux. 2005. Relative Abundance, Growth, and Mortality of Suwannee Bass in Four Florida Rivers. North American Journal of Fisheries Management 25:275-283. \href{https://raw.githubusercontent.com/fishR-Core-Team/FSAdata/main/data-raw/BassFL.csv}{CSV file}
#'
#' @keywords datasets
#'
#' @examples
#' data(BassFL)
#' str(BassFL)
#' head(BassFL)
#' op <- par(mfrow=c(3,2),mar=c(3,3,2,1),mgp=c(1.75,0.5,0),tcl=-0.2,pch=19)
#' plot(log(num)~age,data=BassFL,subset=(loc=="SantaFe" & year==2001 & species=="Suwanee"),
#' ylim=c(0,max(log(num))),main="Suwanee, Santa Fe")
#' points(log(num)~age,data=BassFL,subset=(loc=="SantaFe" & year==2002 & species=="Suwanee"),col="red")
#' legend("topright",legend=c("2001","2002"),col=c("black","red"),pch=19)
#' plot(log(num)~age,data=BassFL,subset=loc=="Wacissa" & year==2002 & species=="Suwanee",
#' ylim=c(0,max(log(num))),main="Suwanee, Wacissa")
#' plot(log(num)~age,data=BassFL,subset=loc=="Withlacoochee" & year==2002 & species=="Suwanee",
#' ylim=c(0,max(log(num))),main="Suwanee, Withlacoochee")
#' plot(log(num)~age,data=BassFL,subset=(loc=="SantaFe" & year==2001 & species=="Largemouth"),
#' ylim=c(0,max(log(num))),main="Largemouth, Santa Fe")
#' points(log(num)~age,data=BassFL,subset=(loc=="SantaFe" & year==2002 & species=="Largemouth"),
#' col="red")
#' legend("topright",legend=c("2001","2002"),col=c("black","red"),pch=19)
#' plot(log(num)~age,data=BassFL,subset=loc=="Ochlockonee" & year==2001 & species=="Largemouth",
#' ylim=c(0,max(log(num))),main="Largemouth, Ochlockonee")
#' points(log(num)~age,data=BassFL,subset=(loc=="Ochlockonee" & year==2002 & species=="Largemouth"),
#' col="red")
#' legend("topright",legend=c("2001","2002"),col=c("black","red"),pch=19)
#' par(op)
#'
NULL
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.