@@ -39,35 +39,35 @@ var smallSmallRange = require( './fixtures/julia/small_small.json' );
3939
4040// VARIABLES //
4141
42- var cdf = tryRequire ( resolve ( __dirname , './../lib/native.js' ) ) ;
42+ var cdf = tryRequire ( resolve ( __dirname , './../lib/native.js' ) ) ;
4343var opts = {
44- 'skip' : ( cdf instanceof Error )
44+ 'skip' : ( cdf instanceof Error )
4545} ;
4646
4747
4848// TESTS //
4949
50- tape ( 'main export is a function' , opts , function test ( t ) {
51- t . ok ( true , __filename ) ;
52- t . strictEqual ( typeof cdf , 'function' , 'main export is a function' ) ;
50+ tape ( 'main export is a function' , opts , function test ( t ) {
51+ t . ok ( true , __filename ) ;
52+ t . strictEqual ( typeof cdf , 'function' , 'main export is a function' ) ;
5353 t . end ( ) ;
5454} ) ;
5555
56- tape ( 'if provided `NaN` for p parameter, the function returns `NaN`' , opts , function test ( t ) {
57- var y = cdf ( 5 , 10 , NaN ) ;
58- t . equal ( isnan ( y ) , true , 'returns NaN' ) ;
56+ tape ( 'if provided `NaN` for p parameter, the function returns `NaN`' , opts , function test ( t ) {
57+ var y = cdf ( 5 , 10 , NaN ) ;
58+ t . equal ( isnan ( y ) , true , 'returns NaN' ) ;
5959 t . end ( ) ;
6060} ) ;
6161
62- tape ( 'if provided a probability `p` outside [0,1], the function returns `NaN`' , opts , function test ( t ) {
63- var y = cdf ( 5 , 10 , 1.5 ) ;
64- t . equal ( isnan ( y ) , true , 'returns NaN' ) ;
65- y = cdf ( 5 , 10 , - 0.5 ) ;
66- t . equal ( isnan ( y ) , true , 'returns NaN' ) ;
62+ tape ( 'if provided a probability `p` outside [0,1], the function returns `NaN`' , opts , function test ( t ) {
63+ var y = cdf ( 5 , 10 , 1.5 ) ;
64+ t . equal ( isnan ( y ) , true , 'returns NaN' ) ;
65+ y = cdf ( 5 , 10 , - 0.5 ) ;
66+ t . equal ( isnan ( y ) , true , 'returns NaN' ) ;
6767 t . end ( ) ;
6868} ) ;
6969
70- tape ( 'the function evaluates the cdf for `k` given a small range `n` and `p`' , opts , function test ( t ) {
70+ tape ( 'the function evaluates the cdf for `k` given a small range `n` and `p`' , opts , function test ( t ) {
7171 var expected ;
7272 var delta ;
7373 var tol ;
@@ -81,27 +81,27 @@ tape('the function evaluates the cdf for `k` given a small range `n` and `p`', o
8181 k = smallSmallRange . x ;
8282 n = smallSmallRange . n ;
8383 p = smallSmallRange . p ;
84- for ( i = 0 ; i < k . length ; i ++ ) {
85- y = cdf ( k [ i ] , n [ i ] , p [ i ] ) ;
86- if ( y === expected [ i ] ) {
87- t . equal ( y , expected [ i ] , 'k: ' + k [ i ] + ', n: ' + n [ i ] + ', p: ' + p [ i ] + ', y: ' + y + ', expected: ' + expected [ i ] ) ;
84+ for ( i = 0 ; i < k . length ; i ++ ) {
85+ y = cdf ( k [ i ] , n [ i ] , p [ i ] ) ;
86+ if ( y === expected [ i ] ) {
87+ t . equal ( y , expected [ i ] , 'k: ' + k [ i ] + ', n: ' + n [ i ] + ', p: ' + p [ i ] + ', y: ' + y + ', expected: ' + expected [ i ] ) ;
8888 } else {
89- delta = abs ( y - expected [ i ] ) ;
89+ delta = abs ( y - expected [ i ] ) ;
9090
9191 // Conditional tolerance adjustment:
92- if ( expected [ i ] < 1e-10 ) {
92+ if ( expected [ i ] < 1e-10 ) {
9393 tol = 1e-5 ; // Increased tolerance for very small values
9494 } else {
95- tol = max ( 2.0 * EPS * abs ( expected [ i ] ) , 1e-12 ) ; // Relative tolerance with a floor
95+ tol = max ( 2.0 * EPS * abs ( expected [ i ] ) , 1e-12 ) ; // Relative tolerance with a floor
9696 }
9797
98- t . ok ( delta <= tol , 'within tolerance. k: ' + k [ i ] + '. n: ' + n [ i ] + '. p: ' + p [ i ] + '. y: ' + y + '. E: ' + expected [ i ] + '. Δ: ' + delta + '. tol: ' + tol + '.' ) ;
98+ t . ok ( delta <= tol , 'within tolerance. k: ' + k [ i ] + '. n: ' + n [ i ] + '. p: ' + p [ i ] + '. y: ' + y + '. E: ' + expected [ i ] + '. Δ: ' + delta + '. tol: ' + tol + '.' ) ;
9999 }
100100 }
101101 t . end ( ) ;
102102} ) ;
103103
104- tape ( 'the function evaluates the cdf for `k` given a medium range `n` and `p`' , opts , function test ( t ) {
104+ tape ( 'the function evaluates the cdf for `k` given a medium range `n` and `p`' , opts , function test ( t ) {
105105 var expected ;
106106 var delta ;
107107 var tol ;
@@ -114,27 +114,27 @@ tape('the function evaluates the cdf for `k` given a medium range `n` and `p`',
114114 k = smallHighRange . x ;
115115 n = smallHighRange . n ;
116116 p = smallHighRange . p ;
117- for ( i = 0 ; i < k . length ; i ++ ) {
118- y = cdf ( k [ i ] , n [ i ] , p [ i ] ) ;
119- if ( y === expected [ i ] ) {
120- t . equal ( y , expected [ i ] , 'k: ' + k [ i ] + ', n: ' + n [ i ] + ', p: ' + p [ i ] + ', y: ' + y + ', expected: ' + expected [ i ] ) ;
117+ for ( i = 0 ; i < k . length ; i ++ ) {
118+ y = cdf ( k [ i ] , n [ i ] , p [ i ] ) ;
119+ if ( y === expected [ i ] ) {
120+ t . equal ( y , expected [ i ] , 'k: ' + k [ i ] + ', n: ' + n [ i ] + ', p: ' + p [ i ] + ', y: ' + y + ', expected: ' + expected [ i ] ) ;
121121 } else {
122- delta = abs ( y - expected [ i ] ) ;
122+ delta = abs ( y - expected [ i ] ) ;
123123
124124 // Conditional tolerance adjustment:
125- if ( expected [ i ] < 1e-10 ) {
125+ if ( expected [ i ] < 1e-10 ) {
126126 tol = 1e-5 ; // Increased tolerance for very small values
127127 } else {
128- tol = max ( 2.0 * EPS * abs ( expected [ i ] ) , 1e-12 ) ; // Relative tolerance with a floor
128+ tol = max ( 2.0 * EPS * abs ( expected [ i ] ) , 1e-12 ) ; // Relative tolerance with a floor
129129 }
130130
131- t . ok ( delta <= tol , 'within tolerance. k: ' + k [ i ] + '. n: ' + n [ i ] + '. p: ' + p [ i ] + '. y: ' + y + '. E: ' + expected [ i ] + '. Δ: ' + delta + '. tol: ' + tol + '.' ) ;
131+ t . ok ( delta <= tol , 'within tolerance. k: ' + k [ i ] + '. n: ' + n [ i ] + '. p: ' + p [ i ] + '. y: ' + y + '. E: ' + expected [ i ] + '. Δ: ' + delta + '. tol: ' + tol + '.' ) ;
132132 }
133133 }
134134 t . end ( ) ;
135135} ) ;
136136
137- tape ( 'the function evaluates the cdf for `k` given a large range `n` and `p`' , opts , function test ( t ) {
137+ tape ( 'the function evaluates the cdf for `k` given a large range `n` and `p`' , opts , function test ( t ) {
138138 var expected ;
139139 var delta ;
140140 var tol ;
@@ -148,27 +148,27 @@ tape('the function evaluates the cdf for `k` given a large range `n` and `p`', o
148148 n = highSmallRange . n ;
149149 k = highSmallRange . x ;
150150 p = highSmallRange . p ;
151- for ( i = 0 ; i < k . length ; i ++ ) {
152- y = cdf ( k [ i ] , n [ i ] , p [ i ] ) ;
153- if ( y === expected [ i ] ) {
154- t . equal ( y , expected [ i ] , 'k: ' + k [ i ] + ', n: ' + n [ i ] + ', p: ' + p [ i ] + ', y: ' + y + ', expected: ' + expected [ i ] ) ;
151+ for ( i = 0 ; i < k . length ; i ++ ) {
152+ y = cdf ( k [ i ] , n [ i ] , p [ i ] ) ;
153+ if ( y === expected [ i ] ) {
154+ t . equal ( y , expected [ i ] , 'k: ' + k [ i ] + ', n: ' + n [ i ] + ', p: ' + p [ i ] + ', y: ' + y + ', expected: ' + expected [ i ] ) ;
155155 } else {
156- delta = abs ( y - expected [ i ] ) ;
156+ delta = abs ( y - expected [ i ] ) ;
157157
158158 // Conditional tolerance adjustment:
159- if ( expected [ i ] < 1e-10 ) {
159+ if ( expected [ i ] < 1e-10 ) {
160160 tol = 1e-5 ; // Increased tolerance for very small values
161161 } else {
162- tol = max ( 2.0 * EPS * abs ( expected [ i ] ) , 1e-12 ) ; // Relative tolerance with a floor
162+ tol = max ( 2.0 * EPS * abs ( expected [ i ] ) , 1e-12 ) ; // Relative tolerance with a floor
163163 }
164164
165- t . ok ( delta <= tol , 'within tolerance. k: ' + k [ i ] + '. n: ' + n [ i ] + '. p: ' + p [ i ] + '. y: ' + y + '. E: ' + expected [ i ] + '. Δ: ' + delta + '. tol: ' + tol + '.' ) ;
165+ t . ok ( delta <= tol , 'within tolerance. k: ' + k [ i ] + '. n: ' + n [ i ] + '. p: ' + p [ i ] + '. y: ' + y + '. E: ' + expected [ i ] + '. Δ: ' + delta + '. tol: ' + tol + '.' ) ;
166166 }
167167 }
168168 t . end ( ) ;
169169} ) ;
170170
171- tape ( 'the function evaluates the cdf for `k` given a large range `n` and `p`' , opts , function test ( t ) {
171+ tape ( 'the function evaluates the cdf for `k` given a large range `n` and `p`' , opts , function test ( t ) {
172172 var expected ;
173173 var delta ;
174174 var tol ;
@@ -182,21 +182,21 @@ tape('the function evaluates the cdf for `k` given a large range `n` and `p`', o
182182 k = highHighRange . x ;
183183 n = highHighRange . n ;
184184 p = highHighRange . p ;
185- for ( i = 0 ; i < k . length ; i ++ ) {
186- y = cdf ( k [ i ] , n [ i ] , p [ i ] ) ;
187- if ( y === expected [ i ] ) {
188- t . equal ( y , expected [ i ] , 'k: ' + k [ i ] + ', n: ' + n [ i ] + ', p: ' + p [ i ] + ', y: ' + y + ', expected: ' + expected [ i ] ) ;
185+ for ( i = 0 ; i < k . length ; i ++ ) {
186+ y = cdf ( k [ i ] , n [ i ] , p [ i ] ) ;
187+ if ( y === expected [ i ] ) {
188+ t . equal ( y , expected [ i ] , 'k: ' + k [ i ] + ', n: ' + n [ i ] + ', p: ' + p [ i ] + ', y: ' + y + ', expected: ' + expected [ i ] ) ;
189189 } else {
190- delta = abs ( y - expected [ i ] ) ;
190+ delta = abs ( y - expected [ i ] ) ;
191191
192192 // Conditional tolerance adjustment:
193- if ( expected [ i ] < 1e-10 ) {
193+ if ( expected [ i ] < 1e-10 ) {
194194 tol = 1e-5 ; // Increased tolerance for very small values
195195 } else {
196- tol = max ( 2.0 * EPS * abs ( expected [ i ] ) , 1e-12 ) ; // Relative tolerance with a floor
196+ tol = max ( 2.0 * EPS * abs ( expected [ i ] ) , 1e-12 ) ; // Relative tolerance with a floor
197197 }
198198
199- t . ok ( delta <= tol , 'within tolerance. k: ' + k [ i ] + '. n: ' + n [ i ] + '. p: ' + p [ i ] + '. y: ' + y + '. E: ' + expected [ i ] + '. Δ: ' + delta + '. tol: ' + tol + '.' ) ;
199+ t . ok ( delta <= tol , 'within tolerance. k: ' + k [ i ] + '. n: ' + n [ i ] + '. p: ' + p [ i ] + '. y: ' + y + '. E: ' + expected [ i ] + '. Δ: ' + delta + '. tol: ' + tol + '.' ) ;
200200 }
201201 }
202202 t . end ( ) ;
0 commit comments