goodness.fit function

Adequacy of models