E.1.u.opt: Expected Value Function
In mirtaher/TwoPeriodSim: Two period model risk sharing using the collective model

This function calculates the expected second period value function given the information revealed in the first period. Essentially, it evaluates the objective function in the optimal second period consumption values and takes the expectation.

1	E.1.u.opt(c2.opt, type = c("u", "U"), spouse = c("h", "w"))

`c2.opt`	The optimal consumption in the second
`type`	Could be individual utility (u) or the joint utility of the couple (U) in a unitary framework
`spouse`	If the type is individual utility (u), we should specify we mean husband or wife utility