Uses a set of measured and predicted values together with the number of model parameters used
AICc(measured, predicted, k)
a vector with measurement values to smooth
a vector with dates / time steps
optional values to weigh the loess fit with
returns the AIC for measured and predicted values for use in model comparison and selection
if (FALSE) {
model_AIC <- AICc(measured, predicted, k)
}