feat(stats): add C implementation for stats/base/dists/hypergeometric/logpmf

lib/node_modules/@stdlib/stats/base/dists/hypergeometric/logpmf/include/stdlib/stats/base/dists/hypergeometric/logpmf.h

@@ -29,7 +29,7 @@ extern "C" {
 #endif
 
 /**
-* Evaluates the natural logarithm of the probability mass function (PMF) for a hypergeometric distribution with population size `N`, subpopulation size `K` and number of draws `n`.
+* Evaluates the natural logarithm of the probability mass function (PMF) for a hypergeometric distribution with population size `N`, subpopulation size `K`, and number of draws `n`.
 */
 double stdlib_base_dists_hypergeometric_logpmf( const double x, const int32_t N, const int32_t K, const int32_t n );
 

lib/node_modules/@stdlib/stats/base/dists/hypergeometric/logpmf/lib/main.js

@@ -32,7 +32,7 @@ var PINF = require( '@stdlib/constants/float64/pinf' );
 // MAIN //
 
 /**
-* Evaluates the natural logarithm of the probability mass function (PMF) for a hypergeometric distribution with population size `N`, subpopulation size `K` and number of draws `n`.
+* Evaluates the natural logarithm of the probability mass function (PMF) for a hypergeometric distribution with population size `N`, subpopulation size `K`, and number of draws `n`.
 *
 * @param {number} x - input value
 * @param {NonNegativeInteger} N - population size

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

@@ -26,7 +26,7 @@ var addon = require( './../src/addon.node' );
 // MAIN //
 
 /**
-* Evaluates the natural logarithm of the probability mass function (PMF) for a hypergeometric distribution with population size `N`, subpopulation size `K` and number of draws `n`.
+* Evaluates the natural logarithm of the probability mass function (PMF) for a hypergeometric distribution with population size `N`, subpopulation size `K`, and number of draws `n`.
 *
 * @private
 * @param {number} x - input value

lib/node_modules/@stdlib/stats/base/dists/hypergeometric/logpmf/manifest.json

@@ -40,6 +40,7 @@
       "dependencies": [
         "@stdlib/math/base/napi/quaternary",
         "@stdlib/math/base/assert/is-nonnegative-integer",
+        "@stdlib/math/base/assert/is-nan",
         "@stdlib/constants/float64/ninf",
         "@stdlib/math/base/special/factorialln",
         "@stdlib/math/base/special/max",
@@ -59,6 +60,7 @@
       "libpath": [],
       "dependencies": [
         "@stdlib/math/base/assert/is-nonnegative-integer",
+        "@stdlib/math/base/assert/is-nan",
         "@stdlib/constants/float64/ninf",
         "@stdlib/math/base/special/factorialln",
         "@stdlib/math/base/special/max",
@@ -79,6 +81,7 @@
       "libpath": [],
       "dependencies": [
         "@stdlib/math/base/assert/is-nonnegative-integer",
+        "@stdlib/math/base/assert/is-nan",
         "@stdlib/constants/float64/ninf",
         "@stdlib/math/base/special/factorialln",
         "@stdlib/math/base/special/max",

lib/node_modules/@stdlib/stats/base/dists/hypergeometric/logpmf/src/main.c

@@ -44,7 +44,7 @@ double stdlib_base_dists_hypergeometric_logpmf( const double x, const int32_t N,
 	double maxs;
 	double mins;
 
-	if (  N < 0 || K < 0 || n < 0 || K > N || n > N ) {
+	if ( stdlib_base_is_nan( x ) || N < 0 || K < 0 || n < 0 || K > N || n > N ) {
 		return 0.0/0.0; // NaN
 	}
 

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

@@ -57,6 +57,12 @@ tape( 'main export is a function', opts, function test( t ) {
 	t.end();
 });
 
+tape( 'if provided `NaN` for input value `x`, the function returns `NaN`', function test( t ) {
+	var y = logpmf( NaN, 10, 9, 5 );
+	t.equal( isnan( y ), true, 'returns expected value' );
+	t.end();
+});
+
 tape( 'if provided an integer `x` greater than `min( n, K )`, the function returns `-Infinity` (provided all parameters are valid)', opts, function test( t ) {
 	var y = logpmf( 11, 20, 20, 10 );
 	t.equal( y, NINF, 'returns expected value' );