Move sampling to array-operations

Rightfully, this removal should mean a version bump to 2.0, indicating
a breaking change.  However given that this library has only a single
user, me, I'll just bump the minor version.

ls-statistics.lisp

@@ -1,5 +1,5 @@
 ;;; -*- Mode: LISP; Base: 10; Syntax: ANSI-Common-Lisp; Package: CL-USER -*-
-;;; Copyright (c) 2022,2023 by Symbolics Pte. Ltd. All rights reserved.
+;;; Copyright (c) 2022,2024 by Symbolics Pte. Ltd. All rights reserved.
 ;;; SPDX-License-identifier: MS-PL
 
 (uiop:define-package #:ls.statistics
@@ -12,11 +12,7 @@
   (:export #:interquartile-range
 	   #:fivenum
 	   #:mean
-	   #:variance
-
-	   ;; Random sampling
-	   #:random-sample
-	   #:map-random-below))
+	   #:variance))
 	   ;; #:quantile))
 
 (in-package #:ls.statistics)

nu-statistics.lisp

@@ -1277,8 +1277,7 @@ for any vector SAMPLE."
 ;;   (values (e- object mean) mean))
 
 ;; (defun aggregate (sequence n function)
-;;   "Aggregate groups of N consecutive elements of SEQUENCE (vector preferred)
-;; using FUNCTION.
+;;   "Aggregate groups of N consecutive elements of SEQUENCE (vector preferred) using FUNCTION.
 
 ;; Example: (aggregate #(1 2 3 5 7 13) 2 #'mean) => #(1.5d0 4.0d0 10.0d0)."
 ;;   (map 'vector function

statistics.asd

@@ -1,10 +1,10 @@
 ;;; -*- Mode: LISP; Base: 10; Syntax: ANSI-Common-lisp; Package: ASDF -*-
-;;; Copyright (c) 2022, 2023 by Symbolics Pte. Ltd. All rights reserved.
+;;; Copyright (c) 2022, 2024 by Symbolics Pte. Ltd. All rights reserved.
 ;;; SPDX-License-identifier: MS-PL
 
 (defsystem "statistics"
   :name "Statistics functions"
-  :version     "1.1.0"
+  :version     "1.2.0"
   :license     :MS-PL
   :author      "Steve Nunez <steve@symbolics.tech>"
   :long-name   "Consolidated Common Lisp statistical functions"
@@ -26,7 +26,6 @@
 	       (:file "lh-statistics")
 	       (:file "nu-statistics")
 	       (:file "ls-statistics")
-	       (:file "random-sample")
 	       (:file "pkgdcl")))
 
 (defsystem "statistics/lh"