View source: R/ciCalculationsParallel.R
ciCalculationsParallel | R Documentation |
Runs EGRETci::bootAnnual in parallel.
ciCalculationsParallel(eList, probs, clusterObject, nBoot = 100,
blockLength = 200, widthCI = 90, seed_var = 23, ...)
eList |
eList object returned from EGRET's WRTDS |
probs |
a vector of probabilities |
clusterObject |
name of cluster object |
nBoot |
number of bootstrap replicates to run |
blockLength |
length of block used to identify neighboring water quality samples |
widthCI |
width of confidence interval (percentiles) |
seed_var |
seed to use for replicable results |
... |
placeholder. Additional arguments are not used at this time, |
list ciCalculationsParallel
returns a list of dataframes
## Not run:
registerDoParallel(cl)
nitro <- lapply(targStns, function(stnSelect)
modelEstimation(convertToEgret(stn = stnSelect, target_analyte = targAnalyte,
wq_data = wqTemp, flow_data = hydDat)))
stopCluster(cl)
nitro <- lapply(nitro, setPA, paStart = WaterYearStart, paLong = 12)
caseSetUp.tkn <- mapLists(trendSetUp, nitro, list2 = NULL,
year2 = list(2017, 2017, 2015, 2015, 2007, 2013), year1 = startDate,
nBoot = nBoot_var, min = 100, blockLength = blockLength_var, bootBreak = 100)
eBoot.tkn <- mapLists(wBT, nitro, caseSetUp.tkn)
closeAllConnections()
CIAnnualResults.tkn <- lapply(nitro, ciCalculations, nBoot = nBoot_CI,
blockLength = blockLength_var, widthCI = 90)
closeAllConnections()
## End(Not run)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.