data(prcpTest)
labels <- c("CENT","AVN","CMCG","ETA","GASP","JMA","NGPS","TCWB","UKMO")
prcpTestData <- ensembleData( forecasts = prcpTest[,labels],
dates = prcpTest$date, observations = prcpTest$obs)
prcpTestFit <- ensembleBMA(prcpTestData, model = "gamma0")
Run the code above in your browser using DataLab