Create accessors.js

Signed-off-by: Kaushikgtm <[email protected]>

Author: Kaushikgtm

lib/node_modules/@stdlib/stats/base/nanminabs/lib/accessors.js

@@ -0,0 +1,89 @@
+/**
+* @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 isnan = require('@stdlib/math/base/assert/is-nan');
+var abs  =  require('@stdlib/math/base/special/abs');
+
+// MAIN //
+
+/**
+* Computes the minimum absolute value of a strided array, ignoring `NaN` values,
+* and supports accessor protocol.
+
+* @param {PositiveInteger} N - number of indexed elements
+* @param {Object} x - input array object
+* @param {Collection} x.data - input array data
+* @param {Array<Function>} x.accessors - array element accessors
+* @param {integer} strideX - stride length for `x`
+* @param {NonNegativeInteger} offsetX - starting index for `x`
+* @returns {Object} output array object
+* @example
+
+*/
+function nanminabs( N, x, strideX, offsetX) {
+      var xbuf;
+      var get;
+      var min;
+      var ix;
+      var v;
+      var i;
+
+      // Cache reference to array data:
+ 	xbuf = x.data;
+ 
+ 	// Cache a reference to the element accessor:
+ 	get = x.accessors[ 0 ];
+
+    if ( N === 1 || strideX === 0 ) {
+      return get ? abs(get(xbuf, offsetX)) : abs(xbuf[offsetX]);
+    }
+
+    ix = offsetX;
+    for ( i = 0; i < N; i++ ) {
+        v = get ? x.get( ix ) : x[ ix ];
+        if ( v === v ) {
+            break;
+        }
+        ix += strideX;
+    }
+    if ( i === N ) {
+        return NaN;
+    }
+    min = abs( v );
+    i += 1;
+    for ( i; i < N; i++ ) {
+        ix += strideX;
+        v = get ? get( xbuf, ix ) : xbuf[ ix ];
+        v = abs( v );
+        if ( isnan( v ) ) {
+            continue;
+        }
+        if ( v < min ) {
+            min = v;
+        }
+    }
+    return min;
+}
+
+// EXPORTS //
+
+module.exports = nanminabs;