added mean variant to summary output

ChangeLog

@@ -1,4 +1,4 @@
-5.2-0.9xxx (12/22/2023)
+5.2-0.9xxx (06/05/2024)
 -----
 Default for par.names and par.names.cs in e0.raftery.diag changed to all parameters.
 
@@ -8,6 +8,8 @@ Fixed bug in setting time index when imputation is present in e0.predict.subnat(
 
 Added argument use.wpp.data to run.e0.mcmc(). 
 
+Added the mean variant into sumary output.
+
 5.2-0 (09/15/2023)
 -----
 Annual subnational projections are now possible, via the argument "annual"

DESCRIPTION

@@ -1,8 +1,8 @@
 Package: bayesLife
 Type: Package
 Title: Bayesian Projection of Life Expectancy
-Version: 5.2-0.9007
-Date: 2024-04-06
+Version: 5.2-0.9008
+Date: 2024-06-05
 Author: Hana Sevcikova, Adrian Raftery, Jennifer Chunn 
 Maintainer: Hana Sevcikova <[email protected]>
 Description: Making probabilistic projections of life expectancy for all countries of the world, using a Bayesian hierarchical model <doi:10.1007/s13524-012-0193-x>. Subnational projections are also supported.

R/projection_fcns.R

@@ -353,10 +353,10 @@ get.projection.summary.header.bayesLife.prediction <- function(pred, ...)
 		return (list(revision='RevID', variant='VarID', country='LocID', year='TimeID', indicator='IndicatorID', sex='SexID', tfr='Value'))
 
 get.UN.variant.names.bayesLife.prediction <- function(pred, ...) 
-		return(c('BHM median', 'BHM80 lower',  'BHM80 upper', 'BHM95 lower',  'BHM95 upper', 'Constant mortality'))
+		return(c('BHM median', 'BHM80 lower',  'BHM80 upper', 'BHM95 lower',  'BHM95 upper', 'BHM mean', 'Constant mortality'))
 
 get.friendly.variant.names.bayesLife.prediction <- function(pred, ...)
-	return(c('median', 'lower 80', 'upper 80', 'lower 95', 'upper 95', 'constant'))	
+	return(c('median', 'lower 80', 'upper 80', 'lower 95', 'upper 95', 'mean', 'constant'))	
 
 convert.e0.trajectories <- function(dir=file.path(getwd(), 'bayesLife.output'), 
 								 n=1000, output.dir=NULL,