Calculates the AIC for one condition one_aic creates the deviance for one condition one_deviance
one_aic
one_aic(d, groups, par)