Movatterモバイル変換

#Install devtools package by following

install.packages(“devtools”)

unload if thispackage is in use previously

detach(“package:aLBI”, unload = T)

or remove theexisting package by following code

remove.packages(“aLBI”)

Install the latest package

devtools::install_github(“Ataher76/aLBI”, force = T)

#Enter one or more numbers, or an empty line to skip updates: 1

calling the library

library(aLBI)

see thedocumentation of the first function

?FishPar

#or help(FishPar)

see thedocumentation of the secon function

?FishSS

or

help(FishSS)

estimating lenght parameters

estimatedParameters <- FishPar(data = lenfreq01, resample = 1000,progress = F)

#Extracting estimated length parameters estimatedParameters\(estimated_length_par #Extracting estimated froeseparameters estimatedParameters\)estimated_froese_par #Extractingestimated frequency parameters estimatedParameters\(estimated_freq_par #Extracting estimated LM_ratioestimatedParameters\)LM_ratio #Extracting estimated PobjestimatedParameters$Pobj

#Calling the second function StockStatus <- FishSS(data = CPdata,LM_ratio = 0.7, Pobj = 97, Pmat = 29.91881 , Popt = 25.46208 )

Extracting stock status

StockStatus\(StockStatusStockStatus\)Target_Cols