Release v3.12.0 (#317)

* fix setting of continous covariates in case of multiple settings and add a test

* update test

* Optimizing tidyCovariates for large data. Fixes #308 (#309)

Co-authored-by: ginberg <ginberg@gmail.com>
Co-authored-by: Admin_mschuemi <Admin_mschuemi@its.jnj.com>

* cran submission file

* add params to getDBCovariateData (#312)

* #292 add function to replace cohort schema and table

* #292 add params

* add test

* doc

* v3.11.0

* update news

* Making removal of redundant covariates reproducible (with unit test). Fixes #315 (#316)

Co-authored-by: Admin_mschuemi <Admin_mschuemi@its.jnj.com>

* version update

* prepare release

* CRAN file

---------

Co-authored-by: Martijn Schuemie <schuemie@ohdsi.org>
Co-authored-by: Admin_mschuemi <Admin_mschuemi@its.jnj.com>

Author: 3 people

CRAN-SUBMISSION

@@ -1,3 +1,3 @@
-Version: 3.11.0
-Date: 2025-09-01 15:11:02 UTC
-SHA: 784c4a8dcda6fc0301c8b0823efdfccb1291745e
+Version: 3.12.0
+Date: 2025-10-28 09:25:00 UTC
+SHA: 0fb802cd699b4e4ec12b59f3d7f232c5d236cecf

DESCRIPTION

@@ -1,8 +1,8 @@
 Package: FeatureExtraction
 Type: Package
 Title: Generating Features for a Cohort
-Version: 3.11.0
-Date: 2025-09-01
+Version: 3.12.0
+Date: 2025-10-28
 Authors@R: c(
   person("Martijn", "Schuemie", , "schuemie@ohdsi.org", role = c("aut")),
   person("Marc", "Suchard", role = c("aut")),

NEWS.md

@@ -1,3 +1,8 @@
+FeatureExtraction 3.12.0
+=======================
+
+- Fix non reproducible behavior in removing redundant covariates when they are equally prevalent (#315)
+
 FeatureExtraction 3.11.0
 =======================
 

R/Normalization.R

@@ -159,7 +159,7 @@ tidyCovariateData <- function(covariateData,
             inner_join(covariateData$valueCounts, by = "covariateId") %>%
             select(.data$analysisId, .data$covariateId, n) %>%
             collect()
-          valueCounts <- valueCounts[order(valueCounts$analysisId, -valueCounts$n), ]
+          valueCounts <- valueCounts[order(valueCounts$analysisId, -valueCounts$n, valueCounts$covariateId), ]
           deleteCovariateIds <- c(deleteCovariateIds, valueCounts$covariateId[!duplicated(valueCounts$analysisId)])
           ignoreCovariateIds <- valueCounts$covariateId
           ParallelLogger::logInfo("Removing ", length(deleteCovariateIds), " redundant covariates")