chore: clean up

Author: Neerajpathak07

lib/node_modules/@stdlib/stats/base/dists/degenerate/logcdf/README.md

@@ -142,23 +142,11 @@ for ( i = 0; i < 100; i++ ) {
 
 #### stdlib_base_dists_degenerate_logcdf( x, mu )
 
-Evaluates the logarithm of the cumulative distribution function (CDF) for a degneerate distribution with constant value of distribution `mu` at a value `x`.
+Evaluates the natural logarithm of the CDF of a degenerate distribution centered at `mu`.
 
 ```c
 double y = stdlib_base_dists_degenerate_logcdf( 2.0, 3.0 );
 // returns ~-Infinity
-
-y = stdlib_base_dists_degenerate_logcdf( 4.0, 3.0 );
-// returns ~0.0
-
-y = stdlib_base_dists_degenerate_logcdf( 3.0, 3.0 );
-// returns ~0.0
-
-y = stdlib_base_dists_degenerate_logcdf( NaN, 0.0 );
-// returns NaN
-
-y = stdlib_base_dists_degenerate_logcdf( 0.0, NaN );
-// returns NaN
 ```
 
 The function accepts the following arguments:
@@ -194,15 +182,20 @@ double stdlib_base_dists_degenerate_logcdf( const double x, const double mu );
 #include <stdlib.h>
 #include <stdio.h>
 
+static double random_uniform( const double min, const double max ) {
+    double v = (double)rand() / ( (double)RAND_MAX + 1.0 );
+    return min + ( v*(max-min) );
+}
+
 int main( void ) {
     double mu;
     double x;
     double y;
     int i;
 
-    for ( i = 0; i < 25; i++ ) {
-        x = stdlib_base_round( ( (double)rand() / (double)RAND_MAX ) * 10.0 );
-        mu = stdlib_base_round( ( (double)rand() / (double)RAND_MAX ) * 10.0 ) ;
+    for ( i = 0; i < 10; i++ ) {
+        x = stdlib_base_round( random_uniform( 0.0, 10.0 ) );
+        mu = stdlib_base_round( random_uniform( 0.0, 10.0 ) );
         y = stdlib_base_dists_degenerate_logcdf( x, mu );
         printf( "x: %1f, µ: %1f, ln(F(x;µ)): %lf\n", x, mu , y );
     }

lib/node_modules/@stdlib/stats/base/dists/degenerate/logcdf/benchmark/benchmark.js

@@ -21,7 +21,8 @@
 // MODULES //
 
 var bench = require( '@stdlib/bench' );
-var randu = require( '@stdlib/random/base/randu' );
+var uniform = require( '@stdlib/random/base/uniform' );
+var Float64Array = require( '@stdlib/array/float64' );
 var isnan = require( '@stdlib/math/base/assert/is-nan' );
 var pkg = require( './../package.json' ).name;
 var logcdf = require( './../lib' );
@@ -30,16 +31,25 @@ var logcdf = require( './../lib' );
 // MAIN //
 
 bench( pkg, function benchmark( b ) {
+	var len;
 	var mu;
 	var x;
 	var y;
 	var i;
 
+	len = 100;
+	x = new Float64Array( len );
+	for ( i = 0; i < len; i++ ) {
+		x[ i ] = uniform( -100.0, 0.0 );
+	}
+	mu = new Float64Array( len );
+	for ( i = 0; i < len; i++ ) {
+		mu[ i ] = uniform( -50.0, 50.0 );
+	}
+
 	b.tic();
 	for ( i = 0; i < b.iterations; i++ ) {
-		x = ( randu()*100.0 ) - 100;
-		mu = ( randu()*100.0 ) - 50.0;
-		y = logcdf( x, mu );
+		y = logcdf( x[ i%100 ], mu[ i%100 ] );
 		if ( isnan( y ) ) {
 			b.fail( 'should not return NaN' );
 		}
@@ -54,6 +64,7 @@ bench( pkg, function benchmark( b ) {
 
 bench( pkg+':factory', function benchmark( b ) {
 	var mylogcdf;
+	var len;
 	var mu;
 	var x;
 	var y;
@@ -62,10 +73,15 @@ bench( pkg+':factory', function benchmark( b ) {
 	mu = 40.0;
 	mylogcdf = logcdf.factory( mu );
 
+	len = 100;
+	x = new Float64Array( len );
+	for ( i = 0; i < len; i++ ) {
+		x[ i ] = uniform( 0.0, 100.0 );
+	}
+
 	b.tic();
 	for ( i = 0; i < b.iterations; i++ ) {
-		x = ( randu()*100.0 );
-		y = mylogcdf( x );
+		y = mylogcdf( x[ i%100 ] );
 		if ( isnan( y ) ) {
 			b.fail( 'should not return NaN' );
 		}

lib/node_modules/@stdlib/stats/base/dists/degenerate/logcdf/benchmark/benchmark.native.js

@@ -23,7 +23,8 @@
 
 var resolve = require( 'path' ).resolve;
 var bench = require( '@stdlib/bench' );
-var randu = require( '@stdlib/random/base/randu' );
+var uniform = require( '@stdlib/random/base/uniform' );
+var Float64Array = require( '@stdlib/array/float64' );
 var isnan = require( '@stdlib/math/base/assert/is-nan' );
 var tryRequire = require( '@stdlib/utils/try-require' );
 var pkg = require( './../package.json' ).name;

lib/node_modules/@stdlib/stats/base/dists/degenerate/logcdf/benchmark/c/benchmark.c

@@ -75,13 +75,15 @@ static double tic( void ) {
 }
 
 /**
-* Generates a random number on the interval [0,1).
+* Generates a random number on the interval [min,max).
 *
-* @return random number
+* @param min    minimum value (inclusive)
+* @param max    maximum value (exclusive)
+* @return       random number
 */
-static double rand_double( void ) {
-	int r = rand();
-	return (double)r / ( (double)RAND_MAX + 1.0 );
+static double random_uniform( const double min, const double max ) {
+	double v = (double)rand() / ( (double)RAND_MAX + 1.0 );
+	return min + ( v*(max-min) );
 }
 
 /**
@@ -91,17 +93,22 @@ static double rand_double( void ) {
 */
 static double benchmark( void ) {
 	double elapsed;
-	double mu;
-    double x;
+	double mu[ 100 ];
+	double x[ 100 ];
 	double y;
 	double t;
 	int i;
 
+	for ( i = 0; i < 100; i++ ) {
+		x[ i ] = random_uniform( -100.0, 0.0 );
+	}
+	for ( i = 0; i < 100; i++ ) {
+		mu[ i ] = random_uniform( -50.0, 50.0 );
+	}
+
 	t = tic();
 	for ( i = 0; i < ITERATIONS; i++ ) {
-        x = ( ( (double)rand() / (double)RAND_MAX )*100.0 ) - 100.0;
-		mu = ( ( (double)rand() / (double)RAND_MAX ) *100.0 ) - 50.0;
-		y = stdlib_base_dists_degenerate_logcdf( x, mu );
+		y = stdlib_base_dists_degenerate_logcdf( x[ i%100 ], mu[ i%100 ] );
 		if ( y != y ) {
 			printf( "should not return NaN\n" );
 			break;

lib/node_modules/@stdlib/stats/base/dists/degenerate/logcdf/examples/c/example.c

@@ -21,15 +21,20 @@
 #include <stdlib.h>
 #include <stdio.h>
 
+static double random_uniform( const double min, const double max ) {
+	double v = (double)rand() / ( (double)RAND_MAX + 1.0 );
+	return min + ( v*(max-min) );
+}
+
 int main( void ) {
 	double mu;
-    double x;
+	double x;
 	double y;
 	int i;
 
-	for ( i = 0; i < 25; i++ ) {
-        x = stdlib_base_round( ( (double)rand() / (double)RAND_MAX ) * 10.0 );
-		mu = stdlib_base_round( ( (double)rand() / (double)RAND_MAX ) * 10.0 ) ;
+	for ( i = 0; i < 10; i++ ) {
+		x = stdlib_base_round( random_uniform( 0.0, 10.0 ) );
+		mu = stdlib_base_round( random_uniform( 0.0, 10.0 ) );
 		y = stdlib_base_dists_degenerate_logcdf( x, mu );
 		printf( "x: %1f, µ: %1f, ln(F(x;µ)): %lf\n", x, mu , y );
 	}

lib/node_modules/@stdlib/stats/base/dists/degenerate/logcdf/include/stdlib/stats/base/dists/degenerate/logcdf.h

@@ -27,7 +27,7 @@ extern "C" {
 #endif
 
 /**
-Evaluates the logarithm of the cumulative distribution function (LOGCDF) for a degneerate distribution with constant value of distribution `mu` at a value `x`.
+Evaluates the natural logarithm of the CDF of a degenerate distribution centered at `mu`.
 */
 double stdlib_base_dists_degenerate_logcdf( const double x, const double mu );
 

lib/node_modules/@stdlib/stats/base/dists/degenerate/logcdf/src/main.c

@@ -21,7 +21,7 @@
 #include "stdlib/constants/float64/ninf.h"
 
 /**
-* Evaluates the logarithm of the cumulative distribution function (CDF) for a degneerate distribution with constant value of distribution `mu` at a value `x`.
+* Evaluates the natural logarithm of the CDF of a degenerate distribution centered at `mu`.
 *
 * @param x     input value
 * @param mu    constant value of distribution