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