feat: refactor and add protocol support to stats/base/max-by

---
type: pre_commit_static_analysis_report
description: Results of running static analysis checks when committing changes.
report:
  - task: lint_filenames
    status: passed
  - task: lint_editorconfig
    status: passed
  - task: lint_markdown
    status: na
  - task: lint_package_json
    status: na
  - task: lint_repl_help
    status: na
  - task: lint_javascript_src
    status: na
  - task: lint_javascript_cli
    status: na
  - task: lint_javascript_examples
    status: na
  - task: lint_javascript_tests
    status: passed
  - task: lint_javascript_benchmarks
    status: na
  - task: lint_python
    status: na
  - task: lint_r
    status: na
  - task: lint_c_src
    status: na
  - task: lint_c_examples
    status: na
  - task: lint_c_benchmarks
    status: na
  - task: lint_c_tests_fixtures
    status: na
  - task: lint_shell
    status: na
  - task: lint_typescript_declarations
    status: na
  - task: lint_typescript_tests
    status: na
  - task: lint_license_headers
    status: passed
---

Author: shwetasrsh

lib/node_modules/@stdlib/stats/base/max-by/test/test.max_by.js

@@ -38,6 +38,15 @@ function accessor( v ) {
 	return v * 2.0;
 }
 
+function createArray( len ) {
+	var arr = [];
+	var i;
+	for ( i = 0; i < len; i++ ) {
+		arr.push(undefined);
+	}
+	return arr;
+}
+
 
 // TESTS //
 
@@ -76,11 +85,11 @@ tape( 'the function calculates the maximum value of a strided array via a callba
 	v = maxBy( x.length, x, 1, accessor );
 	t.strictEqual( isnan( v ), true, 'returns expected value' );
 
-	x = [ 5 ]; // sparse array
+	x = createArray(5); // sparse array
 	v = maxBy( x.length, x, 1, accessor );
 	t.strictEqual( isnan( v ), true, 'returns expected value' );
 
-	x = [ 5 ]; // sparse array
+	x = createArray(5); // sparse array
 	x[ 2 ] = 1.0;
 	v = maxBy( x.length, x, 1, accessor );
 	t.strictEqual( v, 2.0, 'returns expected value' );
@@ -112,7 +121,7 @@ tape( 'if provided an `N` parameter equal to `1`, the function returns the first
 	v = maxBy( 1, x, 1, accessor );
 	t.strictEqual( v, 2.0, 'returns expected value' );
 
-	x = [ 1 ]; // sparse array
+	x = createArray(1); // sparse array
 
 	v = maxBy( 1, x, 1, accessor );
 	t.strictEqual( isnan( v ), true, 'returns expected value' );
@@ -196,7 +205,7 @@ tape( 'if provided a `stride` parameter equal to `0`, the function returns the f
 	v = maxBy( x.length, x, 0, accessor );
 	t.strictEqual( v, 2.0, 'returns expected value' );
 
-	x = [ 1 ]; // sparse array
+	x = createArray(1); // sparse array
 
 	v = maxBy( 1, x, 0, accessor );
 	t.strictEqual( isnan( v ), true, 'returns expected value' );