search for: indivmeanlossamount

...ice factor right bound MinLapseRate <- rep( 0 , InputDim ) # min lapse rate MaxLapseRate <- rep( 1 , InputDim ) # min lapse rate Alpha <- 0.5 #acquisition operator ###############  lapse param end Price <- rep(1 , InputDim ) # Axa price for central market position and price factor = 1 IndivMeanLossAmount <- rep(0.97 , InputDim ) # mean individual loss amount Commission <- rep(0 , InputDim ) # commision rate IndividualExp <- rep(0 , InputDim ) # expense amount per risk ####################################### # Market Expert Model parameter begin : ####################################### LR...