Function for pooling the prediction of a lm model

Function for pooling the prediction of a lm model #168