smoothpar function

Adjust the smoothing parameter to number of observations