Last chance! 50% off unlimited learning
Sale ends in
bmaModelParameters( fit, ...)
ensembleBMAgamma0
and ensembleBMAnormal
fits, there
is an additional dates
argument, giving a character representation
of the dates for which BMA model parameters are desired.
dates
mensembleBMAgamma0
,
ensembleBMAnormal
,
fitBMAgamma0
,
fitBMAnormal
data(slpTest)
memberLabels <- c("AVN","GEM","ETA","NGM","NOGAPS")
slpTestData <- ensembleData(forecasts = slpTest[ ,memberLabels],
observations = slpTest$obs, dates = slpTest$date)
slpTestFit1 <- ensembleBMAnormal(slpTestData, date = "2000063000")
bmaModelParameters( slpTestFit1, date = "2000063000")
trainDat <- trainingData( slpTestData, date = "2000063000",
trainingRule = slpTestFit1$training)
slpTestFit2 <- fitBMAnormal(trainDat)
bmaModelParameters( slpTestFit2)
Run the code above in your browser using DataLab