Displaying 1 result from an estimated 1 matches for "surfaceindexparameters".
2013 Mar 21
0
"[[i]]$" <- "" indexing and lapply
...alINFO = INFO,
windowY = 10, windowQ = 2, windowS = 0.5, minNumObs = 100,
minNumUncen = 50, env = parent.frame())
{
cat("\n first step running estCrossVal may take about 1 minute")
Sample1 <- estCrossVal(SampleCrossV = localSample, windowY,
windowQ, windowS, minNumObs, minNumUncen)
surfaceIndexParameters <- surfaceIndex(localDaily = localDaily)
localINFO$bottomLogQ <- surfaceIndexParameters[1]
localINFO$stepLogQ <- surfaceIndexParameters[2]
localINFO$nVectorLogQ <- surfaceIndexParameters[3]
localINFO$bottomYear <- surfaceIndexParameters[4]
localINFO$stepYear <- surfaceIndexParamet...