From 43e1182aa306d284d576faefc19927fad787a462 Mon Sep 17 00:00:00 2001
From: Chris Sobczak <chris@sobczak.family>
Date: Sun, 12 Jul 2026 12:44:21 -0700
Subject: p not used

---
 R/stability_score.R | 1 -
 1 file changed, 1 deletion(-)

(limited to 'R')

diff --git a/R/stability_score.R b/R/stability_score.R
index 45fc078..2b7a42d 100644
--- a/R/stability_score.R
+++ b/R/stability_score.R
@@ -10,7 +10,6 @@
 #' @export
 stability_score <- function(X, K = 25, subsample_fraction = 0.7){
 	n <- nrow(X)
-	p <- ncol(X)
 	rho <- vector('list', K)
 	for(r in seq_len(K)){
 		idx <- sample(n, size = floor(subsample_fraction * n))
-- 
cgit v1.2.3