An Ad Hoc Procedure for Reducing the Number of Variables to be Included in a Linear Model