#=================================================================================
rm(list=ls())
require(RLPlots)
#stock <- "CRA5"
#source.dir <- paste0(stock,"/base2/")
stock <- "CRA5"
source.dir <- stock
target.dir <- source.dir
MPD.All(stock, source.dir)
MCMC.All(stock, source.dir)
LF(stock, source.dir, target.dir)
CPUE_posterior(stock, source.dir, target.dir)
Rec_posterior(stock, source.dir, target.dir)
TraceHisto(stock, source.dir, target.dir)
system(paste0("rm ", source.dir, "/*.png"))
stock <- "CRA1"
source.dir <- c("/home/darcy/Documents/CRA/2014/model/CRA1/mcmc/base2",
"/home/darcy/Documents/CRA/2014/model/CRA1/mcmc/recce")
Multichain.All(stock, source.dir)
target.dir <- "/home/darcy/Documents/CRA/2014/model/CRA1/mchains/base2-merged"
stock <- "CRA1"
source.dir <- c("/home/darcy/Documents/CRA/2014/model/CRA1/stackedinformed-snail")
Snail(stock, source.dir)
source.dir <- c("/home/darcy/Documents/CRA/2014/model/CRA1/stackeduniform-snail")
Snail(stock, source.dir)
#=================================================================================
TraceHisto(stock, source.dir, target.dir, MCMCOptions, PlotOptions)
RunningAvgShort(stock, source.dir, target.dir, MCMCOptions,
PlotOptions)
CPUE_posterior(stock, source.dir, target.dir, CPUEOptions,
MCMCOptions, PlotOptions)
CR_posterior(stock, source.dir, target.dir, MCMCOptions,
PlotOptions)
Bio_posterior(stock, source.dir, target.dir, MCMCOptions,
BioOptions, PlotOptions)
Rec_posterior(stock, source.dir, target.dir, MCMCOptions,
PlotOptions)
SP_posterior(stock, source.dir, target.dir, MCMCOptions,
PlotOptions)
Mature_posterior(stock, source.dir, target.dir, PlotOptions)
Select_posterior(stock, source.dir, target.dir, PlotOptions)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.