comparison rDiff/src/locfit/Source/lfcons.h @ 0:0f80a5141704

version 0.3 uploaded
author vipints
date Thu, 14 Feb 2013 23:38:36 -0500
parents
children
comparison
equal deleted inserted replaced
-1:000000000000 0:0f80a5141704
1 /*
2 * Numeric values for constants used in locfit
3 */
4
5 /*
6 MXDIM and MXDEG are maximum dimension and local polynomial
7 degree for Locfit. Note that some parts of the code may be
8 more restrictive.
9 */
10 #define MXDIM 15
11 #define MXDEG 7
12
13 /*
14 floating point constants
15 */
16 #ifndef PI
17 #define PI 3.141592653589793238462643
18 #endif
19 #define S2PI 2.506628274631000502415765
20 #define SQRT2 1.4142135623730950488
21 #define LOGPI 1.144729885849400174143427
22 #define GOLDEN 0.61803398874989484820
23 #define HL2PI 0.91893853320467267 /* log(2pi)/2 */
24 #define SQRPI 1.77245385090552 /* sqrt(pi) */
25 #define HUBERC 2.0
26
27 /*
28 Criteria for adaptive local fitting mi[MACRI]
29 1: localized CP; 2: ICI (katkovnik); 3: curvature model index
30 4: Increase bandwidth until locfit returns LF_OK
31 */
32 #define ANONE 0
33 #define ACP 1
34 #define AKAT 2
35 #define AMDI 3
36 #define AOK 4
37
38 /*
39 vector of double precision parameters.
40 0, 1, 2 are the three components of the smoothing parameter.
41 3 cut parameter for adaptive evaluation structures.
42 4-8 are likelihood, degrees of freedom and residual variance,
43 computed as part of the fit.
44 Stored as the lf.dp vector.
45 */
46 #define DALP 0
47 #define DFXH 1
48 #define DADP 2
49 #define DCUT 3
50 #define DLK 4
51 #define DT0 5
52 #define DT1 6
53 #define DRV 7
54 #define DSWT 8
55 #define DRSC 9
56 #define LEND 10
57
58 /*
59 Evaluation structures mi[MEV]
60 EFITP special for `interpolation' at fit points
61 */
62 #define ENULL 0
63 #define ETREE 1
64 #define EPHULL 2
65 #define EDATA 3
66 #define EGRID 4
67 #define EKDTR 5
68 #define EKDCE 6
69 #define ECROS 7
70 #define EPRES 8
71 #define EXBAR 9
72 #define ENONE 10
73 #define ESPHR 11
74 #define EFITP 50
75 #define ESPEC 100
76
77 /*
78 integer parameters: sample size; dimension; number of local parameters etc.
79 stored as the lf.mi vector.
80 */
81 #define MN 0
82 #define MP 1
83 #define MDEG0 2
84 #define MDEG 3
85 #define MDIM 4
86 #define MACRI 5
87 #define MKER 6
88 #define MKT 7
89 #define MIT 8
90 #define MMINT 9
91 #define MMXIT 10
92 #define MREN 11
93 #define MEV 12
94 #define MTG 13
95 #define MLINK 14
96 #define MDC 15
97 #define MK 16
98 #define MDEB 17
99 #define MGETH 18
100 #define MPC 19
101 #define MUBAS 20
102 #define LENM 21
103
104 /*
105 Link functions mi[MLINK].
106 Mostly as in table 4.1 of the book.
107 LDEFAU and LCANON are used to select default and canonical
108 links respectively. LINIT shouldn't be selected by user...
109 */
110 #define LINIT 0
111 #define LDEFAU 1
112 #define LCANON 2
113 #define LIDENT 3
114 #define LLOG 4
115 #define LLOGIT 5
116 #define LINVER 6
117 #define LSQRT 7
118 #define LASIN 8
119
120 /*
121 components of vector returned by the links() function
122 in family.c. ZLIK the likelihood; ZMEAN = estimated mean;
123 ZDLL = derivative of log-likelihood; ZDDLL = - second derivative
124 */
125 #define LLEN 4
126 #define ZLIK 0
127 #define ZMEAN 1
128 #define ZDLL 2
129 #define ZDDLL 3
130
131 /*
132 weight functions mi[MKER].
133 see Table 3.1 or the function W() in weights.c for definitions.
134 */
135 #define WRECT 1
136 #define WEPAN 2
137 #define WBISQ 3
138 #define WTCUB 4
139 #define WTRWT 5
140 #define WGAUS 6
141 #define WTRIA 7
142 #define WQUQU 8
143 #define W6CUB 9
144 #define WMINM 10
145 #define WEXPL 11
146 #define WMACL 12
147 #define WPARM 13
148
149 /*
150 type of multivariate weight function mi[MKT]
151 KSPH (spherical) KPROD (product)
152 others shouldn't be used at present.
153 */
154 #define KSPH 1
155 #define KPROD 2
156 #define KCE 3
157 #define KLM 4
158 #define KZEON 5
159
160 #define STANGL 4
161 #define STLEFT 5
162 #define STRIGH 6
163 #define STCPAR 7
164
165 /*
166 Local likelihood family mi[MTG]
167 for quasi-likelihood, add 64.
168 */
169 #define TNUL 0
170 #define TDEN 1
171 #define TRAT 2
172 #define THAZ 3
173 #define TGAUS 4
174 #define TLOGT 5
175 #define TPOIS 6
176 #define TGAMM 7
177 #define TGEOM 8
178 #define TCIRC 9
179 #define TROBT 10
180 #define TRBIN 11
181 #define TWEIB 12
182 #define TCAUC 13
183 #define TPROB 14
184
185 /*
186 Integration type mi[MIT] for integration in
187 density estimation.
188 */
189 #define INVLD 0
190 #define IDEFA 1
191 #define IMULT 2
192 #define IPROD 3
193 #define IMLIN 4
194 #define IHAZD 5
195 #define ISPHR 6
196 #define IMONT 7
197
198 /*
199 For prediction functions, what to predict?
200 PCOEF -- coefficients PT0 -- influence function
201 PNLX -- ||l(x)|| PBAND -- bandwidth h(x)
202 PDEGR -- local poly. degree PLIK -- max. local likelihood
203 PRDF -- local res. d.f. PVARI -- ||l(x)||^2
204 */
205 #define PCOEF 1
206 #define PT0 2
207 #define PNLX 3
208 #define PBAND 4
209 #define PDEGR 5
210 #define PLIK 6
211 #define PRDF 7
212 #define PVARI 8
213
214 /*
215 Residual Types
216 */
217 #define RDEV 1
218 #define RPEAR 2
219 #define RRAW 3
220 #define RLDOT 4
221 #define RDEV2 5
222 #define RLDDT 6
223 #define RFIT 7
224 #define RMEAN 8
225
226 /*
227 components of the colour vector
228 */
229 #define CBAK 0
230 #define CAXI 1
231 #define CTEX 2
232 #define CLIN 3
233 #define CPOI 4
234 #define CCON 5
235 #define CCLA 6
236 #define CSEG 7
237 #define CPA1 8
238 #define CPA2 9
239
240 /*
241 variable types: double, int, char, argument list
242 */
243 #define VDOUBLE 0
244 #define VINT 1
245 #define VCHAR 2
246 #define VARGL 3
247 #define VPREP 4
248 #define VARC 5
249 #define VVARI 6
250 #define VXYZ 7
251
252 /*
253 variable status
254 */
255 #define STEMPTY 0
256 #define STREGULAR 1
257 #define STHIDDEN 3
258 #define STPLOTVAR 4
259 #define STSYSTEM 5
260 #define STSYSPEC 6
261 #define STREADFI 7
262
263 /*
264 return status for the locfit() function
265 */
266 #define LF_OK 0
267 #define LF_DONE 1 /* done - forced break from iterations */
268 #define LF_OOB 2 /* out of bounds, or large unstable parameter */
269 #define LF_PF 3 /* perfect fit; interpolation; deviance=0 */
270 #define LF_NCON 4 /* not converged */
271 #define LF_NSLN 5 /* no solution - eg separation in binomial. */
272 #define LF_NOPT 6 /* no or insufficient points with non-zero wt */
273 #define LF_INFA 7 /* initial failure e.g. log(0) */
274 #define LF_DEMP 10 /* density -- empty integration region */
275 #define LF_XOOR 11 /* density -- fit point outside xlim region */
276 #define LF_DNOP 12 /* density version of 6 */
277 #define LF_FPROB 80
278 #define LF_BADP 81 /* bad parameters e.g. neg prob for binomial */
279 #define LF_LNK 82 /* invalid link */
280 #define LF_FAM 83 /* invalid family */
281 #define LF_ERR 99 /* error */
282
283 /*
284 * mi[MGETH] codes
285 * scb(), pointwise codes are 71,...,75.
286 * add 10 for simultaneous codes.
287 */
288 #define GSTD 0
289 #define GHAT 1
290 #define GKAP 2
291 #define GRBD 3
292 #define GAMF 4
293 #define GAMP 5
294 #define GLSC 6
295 #define GSMP 7
296 #define GMIX 8
297 #define GLM1 71
298 #define GLM2 72
299 #define GLM3 73
300 #define GLM4 74
301 #define GLDN 75
302
303 /* bandwidth criteria */
304 #define BGCV 1
305 #define BCP 2
306 #define BIND 3