annotate rDiff/src/locfit/m/aic.m @ 3:29a698dc5c7e default tip

Merge multiple heads.
author Dave Bouvier <dave@bx.psu.edu>
date Mon, 27 Jan 2014 14:15:36 -0500
parents 0f80a5141704
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
0f80a5141704 version 0.3 uploaded
vipints
parents:
diff changeset
1 function g=aic(varargin)
0f80a5141704 version 0.3 uploaded
vipints
parents:
diff changeset
2
0f80a5141704 version 0.3 uploaded
vipints
parents:
diff changeset
3 pen = 2.0;
0f80a5141704 version 0.3 uploaded
vipints
parents:
diff changeset
4
0f80a5141704 version 0.3 uploaded
vipints
parents:
diff changeset
5 fit = locfit(varargin{:});
0f80a5141704 version 0.3 uploaded
vipints
parents:
diff changeset
6 rs = rsum(fit);
0f80a5141704 version 0.3 uploaded
vipints
parents:
diff changeset
7
0f80a5141704 version 0.3 uploaded
vipints
parents:
diff changeset
8 df0 = rs(1);
0f80a5141704 version 0.3 uploaded
vipints
parents:
diff changeset
9 df1 = rs(2);
0f80a5141704 version 0.3 uploaded
vipints
parents:
diff changeset
10 llk = rs(3);
0f80a5141704 version 0.3 uploaded
vipints
parents:
diff changeset
11 ai = -2*llk + pen * df0;
0f80a5141704 version 0.3 uploaded
vipints
parents:
diff changeset
12 g = [llk df0 df1 ai];
0f80a5141704 version 0.3 uploaded
vipints
parents:
diff changeset
13
0f80a5141704 version 0.3 uploaded
vipints
parents:
diff changeset
14 return;