Compute a starting point for the Simulated Annealing algorithm.

compute_starting_point_sann(beta_expe)

Arguments

beta_expe

a numerical vector, the expectation of the coefficient function posterior sample.

Value

a matrix with 3 columns : "m", "l" and "b". The two first columns define the begin and the end of the intervals and the third gives the mean values of each interval.

Examples

data(res_bliss1)
mystart<-compute_starting_point_sann(apply(res_bliss1$beta_sample[[1]],2,mean))