Update native tests for hypergeometric entropy function

Signed-off-by: Archit Mishra <145186590+24archit@users.noreply.github.com>

Author: 24archit

lib/node_modules/@stdlib/stats/base/dists/hypergeometric/entropy/test/test.native.js

@@ -1,47 +1,95 @@
+/**
+* @license Apache-2.0
+*
+* Copyright (c) 2025 The Stdlib Authors.
+*
+* Licensed under the Apache License, Version 2.0 (the "License");
+* you may not use this file except in compliance with the License.
+* You may obtain a copy of the License at
+*
+* http://www.apache.org/licenses/LICENSE-2.0
+*
+* Unless required by applicable law or agreed to in writing, software
+* distributed under the License is distributed on an "AS IS" BASIS,
+* WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+* See the License for the specific language governing permissions and
+* limitations under the License.
+*/
+
 'use strict';
 
+// MODULES //
+
 var resolve = require( 'path' ).resolve;
 var tape = require( 'tape' );
 var tryRequire = require( '@stdlib/utils/try-require' );
 var isnan = require( '@stdlib/math/base/assert/is-nan' );
 var abs = require( '@stdlib/math/base/special/abs' );
+var EPS = require( '@stdlib/constants/float64/eps' );
+
+
+// FIXTURES //
+
+var data = require( './fixtures/julia/data.json' );
+
+
+// VARIABLES //
 
 var entropy = tryRequire( resolve( __dirname, './../lib/native.js' ) );
 var opts = {
 	'skip': ( entropy instanceof Error )
 };
 
+
+// TESTS //
+
 tape( 'main export is a function', opts, function test( t ) {
 	t.ok( true, __filename );
 	t.strictEqual( typeof entropy, 'function', 'main export is a function' );
 	t.end();
 });
 
+tape( 'if provided `NaN` for any parameter, the function returns `NaN`', opts, function test( t ) {
+	var v = entropy( NaN, 10, 5 );
+	t.equal( isnan( v ), true, 'returns NaN' );
+
+	v = entropy( 20, NaN, 5 );
+	t.equal( isnan( v ), true, 'returns NaN' );
+
+	v = entropy( 20, 10, NaN );
+	t.equal( isnan( v ), true, 'returns NaN' );
+
+	t.end();
+});
+
 tape( 'if provided an `N` which is not a nonnegative integer, the function returns `NaN`', opts, function test( t ) {
 	var v = entropy( -2, 4, 2 );
 	t.strictEqual( isnan( v ), true, 'returns NaN' );
 	t.end();
 });
 
-tape( 'the function returns the entropy', opts, function test( t ) {
+tape( 'the function matches expected results generated by Julia', opts, function test( t ) {
 	var expected;
 	var delta;
 	var tol;
 	var v;
+	var N;
+	var K;
+	var n;
+	var i;
 
-	// Case 1: N=2, K=1, n=1 (50/50 chance)
-	v = entropy( 2, 1, 1 );
-	expected = 0.69314718056;
-	delta = abs( v - expected );
-	tol = 1.0e-9;
-	t.ok( delta < tol, 'within tolerance. v: ' + v + '. expected: ' + expected );
+	for ( i = 0; i < data.expected.length; i++ ) {
+		N = data.N[ i ];
+		K = data.K[ i ];
+		n = data.n[ i ];
+		expected = data.expected[ i ];
 
-	// Case 2: N=16, K=11, n=4
-	v = entropy( 16, 11, 4 );
-	expected = 1.2156868611027067; // Corrected Value
-	delta = abs( v - expected );
-	tol = 1.0e-9;
-	t.ok( delta < tol, 'within tolerance. v: ' + v + '. expected: ' + expected );
+		v = entropy( N, K, n );
+		
+		delta = abs( v - expected );
+		tol = 50.0 * EPS;
 
+		t.ok( delta <= tol, 'within tolerance. N: ' + N + '. K: ' + K + '. n: ' + n + '. v: ' + v + '. expected: ' + expected );
+	}
 	t.end();
 });