Release 1.2.5

Co-Authored-By: Claude Fable 5.1 <noreply@anthropic.com>
Claude-Session: https://claude.ai/code/session_01GVZR4QjrTXCv55j4qdo6E2

Author: rootcoder007

CITATION.cff

@@ -8,7 +8,7 @@ authors:
     affiliation: "Centre for Criminology and Sociolegal Studies, University of Toronto"
     name-particle: "Singh"
     # IPA: /ʋənʃ sɪŋ ɾʊˈɦeːlɑː/
-version: "1.2.4"
+version: "1.2.5"
 date-released: "2026-09-08"
 url: "https://github.com/rootcoder007/morie"
 repository-code: "https://github.com/rootcoder007/morie"

VERSION

@@ -1 +1 @@
-1.2.4
+1.2.5

VERSION_INVENTORY.csv

@@ -4,7 +4,7 @@ build-backend = "scikit_build_core.build"
 
 [project]
 name = "morie"
-version = "1.2.4"
+version = "1.2.5"
 description = "Multi-domain scientific computing toolkit (Python + R) for observational inference and intervention analysis. Provides causal estimators (ATE, ATT, AIPW, DML, G-computation), survey sampling, propensity-score and doubly-robust methods, sensitivity analysis, spatial statistics, Hawkes point processes, and psychometrics, with a unified RichResult output."
 authors = [
   { name="Vansh Singh Ruhela", email="vsruhela@proton.me" }

pyproject.toml

@@ -1,7 +1,7 @@
 Package: morie
 Type: Package
 Title: Multi-Domain Open Research and Inferential Estimation
-Version: 1.2.4
+Version: 1.2.5
 Authors@R: c(
   person(
     given = "Vansh Singh",
@@ -44,7 +44,7 @@ Imports:
   graphics,
   Rcpp,
   rmoriebricklayer (>= 0.3.8),
-  rmoriedata (>= 0.3.0)
+  rmoriedata (>= 1.2.5)
 LinkingTo: Rcpp, RcppArmadillo, rmoriebricklayer
 SystemRequirements: libcurl: libcurl-devel (rpm) or libcurl4-openssl-dev (deb)
 Suggests:

r-package/morie/DESCRIPTION

@@ -1,4 +1,4 @@
-# morie (next release) - in progress
+# morie 1.2.5 - 2026-09-18
 
 Synced from rmorie 1.2.4's fixes of 2026-09-16 and 2026-09-17.
 

r-package/morie/NEWS.md

@@ -662,7 +662,7 @@ EcgEmgCpl <- function(ecg, emg, qrs, fs) {
 }
 
 
-#' Section 1.2.4 waves and intervals.  Amplitudes are measured against
+#' Section 1.2.5 waves and intervals.  Amplitudes are measured against
 #' the
 #'
 #' PQ segment, not against zero: the PQ segment is the isoelectric
@@ -678,7 +678,7 @@ EcgEmgCpl <- function(ecg, emg, qrs, fs) {
 #' \code{fs}, \code{method}.
 #' @export
 EcgFeat <- function(x, qrs, fs) {
-  # Section 1.2.4 waves and intervals.  Amplitudes are measured against the
+  # Section 1.2.5 waves and intervals.  Amplitudes are measured against the
   # PQ segment, not against zero: the PQ segment is the isoelectric reference
   # the book names, and it absorbs any residual baseline offset.
   fs <- .morie_qrs_fs(fs)
@@ -761,7 +761,7 @@ EcgFeat <- function(x, qrs, fs) {
        qtdurmean = .morie_qrs_mean(qtdur), rampmean = .morie_qrs_mean(ramp),
        nbeats = length(q), fs = fs,
        method = paste0("ECG wave amplitudes and durations against the PQ ",
-                       "isoelectric reference, Rangayyan (2024) Section 1.2.4"))
+                       "isoelectric reference, Rangayyan (2024) Section 1.2.5"))
 }
 
 
@@ -783,7 +783,7 @@ EcgFeat <- function(x, qrs, fs) {
 #' @export
 EcgWaveShp <- function(qrsdur, stdev, rdur = NULL, sdur = NULL,
                        qpresent = NULL) {
-  # Sections 1.2.4 (ST deviation against the PQ reference) and 10.2.1 (the
+  # Sections 1.2.5 (ST deviation against the PQ reference) and 10.2.1 (the
   # incomplete LBBB/RBBB duration rules).  Only the duration-based parts of
   # the book's rules are computable from one measured QRS duration; the
   # lead-specific conditions are RETURNED as still-required checks rather
@@ -812,14 +812,14 @@ EcgWaveShp <- function(qrsdur, stdev, rdur = NULL, sdur = NULL,
        qabsent = if (is.null(qpresent)) NULL else !isTRUE(as.logical(qpresent)),
        stdev = stdev, stfinding = st, required = req,
        method = paste0("ECG waveshape rules for ischemia and bundle-branch ",
-                       "block, Rangayyan (2024) Sections 1.2.4 and 10.2.1"))
+                       "block, Rangayyan (2024) Sections 1.2.5 and 10.2.1"))
 }
 
 
 #' ST level at J + jofs relative to the PQ isoelectric level, and the
 #' slope
 #'
-#' of the segment that follows (Section 1.2.4).  The 0.1 mV threshold is
+#' of the segment that follows (Section 1.2.5).  The 0.1 mV threshold is
 #' the conventional clinical figure, NOT a book value -- the payload
 #' says so.
 #'
@@ -834,7 +834,7 @@ EcgWaveShp <- function(qrsdur, stdev, rdur = NULL, sdur = NULL,
 #' @export
 ExerEcgSt <- function(x, qrs, fs, jofs = 0.060, thresh = 0.1) {
   # ST level at J + jofs relative to the PQ isoelectric level, and the slope
-  # of the segment that follows (Section 1.2.4).  The 0.1 mV threshold is the
+  # of the segment that follows (Section 1.2.5).  The 0.1 mV threshold is the
   # conventional clinical figure, NOT a book value -- the payload says so.
   fs <- .morie_qrs_fs(fs)
   x <- .morie_qrs_check(x, 16L, "ECG")
@@ -877,7 +877,7 @@ ExerEcgSt <- function(x, qrs, fs, jofs = 0.060, thresh = 0.1) {
                            "verified here"),
        jofs = jofs, fs = fs,
        method = paste0("ST level and slope against the PQ isoelectric ",
-                       "reference, Rangayyan (2024) Section 1.2.4"))
+                       "reference, Rangayyan (2024) Section 1.2.5"))
 }
 
 
@@ -1830,7 +1830,7 @@ TWaveDet <- function(chans, qrs, fs, tdur = 0.160) {
 }
 
 
-#' Sections 1.2.4 and 8.11 describe VF but give NO detector and NO
+#' Sections 1.2.5 and 8.11 describe VF but give NO detector and NO
 #'
 #' threshold, and no external primary source was verified here.  The
 #' rule below is therefore stated as what it is: a two-part heuristic
@@ -1849,7 +1849,7 @@ TWaveDet <- function(chans, qrs, fs, tdur = 0.160) {
 #' \code{fs}, \code{method}.
 #' @export
 VfDetect <- function(x, fs, win = 4, conc = 0.60, crest = 4) {
-  # Sections 1.2.4 and 8.11 describe VF but give NO detector and NO
+  # Sections 1.2.5 and 8.11 describe VF but give NO detector and NO
   # threshold, and no external primary source was verified here.  The rule
   # below is therefore stated as what it is: a two-part heuristic from the
   # two properties the book DOES assert -- no discrete QRS complexes (so the
@@ -1903,7 +1903,7 @@ VfDetect <- function(x, fs, win = 4, conc = 0.60, crest = 4) {
        rate = rates, conc = conc, crestmax = crest, nwin = length(flags),
        fraction = sum(flags) / length(flags), win = win, fs = fs,
        method = paste0("VF heuristic from QRS absence and spectral ",
-                       "concentration; Rangayyan (2024) Sections 1.2.4 and ",
+                       "concentration; Rangayyan (2024) Sections 1.2.5 and ",
                        "8.11 describe VF but give no detector, and no ",
                        "external primary source was verified for this rule"))
 }

r-package/morie/R/aaa_rangayyan_qrs.R

@@ -15,7 +15,7 @@
 #' @references Cochran (1977), Sampling Techniques, 3rd edition, Chapter
 #'   2, where V(ybar) = (S^2/n)(N - n)/N for simple random sampling
 #'   without replacement. Cross-checked against the reference
-#'   implementation in the CRAN package samplingbook 1.2.4, whose Smean
+#'   implementation in the CRAN package samplingbook 1.2.5, whose Smean
 #'   uses the variance (N - n)/N * (1/(n(n-1))) sum (y - ybar)^2.
 #' @export
 #' @examples

r-package/morie/R/fpcadj.R

@@ -21,7 +21,7 @@
 #'   10 (subsampling / two-stage sampling). Chapter 10 was NOT in the
 #'   scanned excerpt available to this batch, so the estimator and
 #'   variance are taken from the reference implementation in the CRAN
-#'   package samplingbook 1.2.4, function submean with method = "ratio".
+#'   package samplingbook 1.2.5, function submean with method = "ratio".
 #' @export
 Twostage <- function(Y, Nl, M, N, level = 0.95) {
   m <- length(Y)

r-package/morie/R/multipsr.R

@@ -16,7 +16,7 @@
 #'   5.3, Corollary 2, "stratification with proportional allocation of
 #'   the n_h", n_h/n = N_h/N. Chapter 5 read from the scanned original.
 #'   Cross-checked against the reference implementation in the CRAN
-#'   package samplingbook 1.2.4, whose stratasamp(type = "prop") sets
+#'   package samplingbook 1.2.5, whose stratasamp(type = "prop") sets
 #'   wh <- Nh/N.
 #' @export
 #' @examples