jackknife.SR: 再生産関係のジャックナイフ解析

In ichimomo/frasyr: Fisheries Research Agency (FRA) provides the method for calculating sustainable yield (SY) with R

再生産関係のジャックナイフ解析

Description

結果のプロットもこの関数で行う

Usage

jackknife.SR(
  resSR,
  is.plot = TRUE,
  use.p0 = TRUE,
  output = FALSE,
  filename = "jackknife",
  ylim.range = c(0, 1.5),
  pch = 19,
  cex = 1.1,
  ...
)

Arguments

resSR	fit.SRかfit.SRregimeのオブジェクト
is.plot	プロットするかどうか
use.p0	初期値にresSRの結果を使うか否か
output	pngファイルに出力するか否か
filename	ファイル名

Examples

## Not run: 
data(res_vpa)
SRdata <- get.SRdata(res_vpa)
resSR <- fit.SR(SRdata, SR = c("HS","BH","RI")[1],
                method = c("L1","L2")[2], AR = 1,
                out.AR = TRUE)
res_jackSR <- jackknife.SR(resSR,output = T)

# if calculate steepness
bio_par <- derive_biopar(res_obj=res_vpa,derive_year = 2010)
resSR <- fit.SR(SRdata, SR = c("HS","BH","RI")[1],
                method = c("L1","L2")[2], AR = 1,
                out.AR = TRUE,bio_par=bio_par)
res_jackSR <- jackknife.SR(resSR,output = T)

## End(Not run)

ichimomo/frasyr documentation built on May 3, 2024, 1:30 a.m.