From 1dc42a2708d1bef26d5e1ea5993f461366e81f9c Mon Sep 17 00:00:00 2001
From: corentinchoisy <corentin.choisy@proton.me>
Date: Mon, 26 May 2025 14:19:25 +0200
Subject: [PATCH] Added option in select_weight

---
 R/select_weight.R    | 2 +-
 man/select_weight.Rd | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/R/select_weight.R b/R/select_weight.R
index 7f4378c..b944298 100644
--- a/R/select_weight.R
+++ b/R/select_weight.R
@@ -15,7 +15,7 @@
 #' @export
 
 
-select_weight <- function(df=NULL,grp=NULL,X=NULL,instr=NULL,type.res="deviance",std=T) {
+select_weight <- function(df=NULL,grp=NULL,X=NULL,instr=NULL,type.res="deviance",std=F) {
   formu <- paste0(grp,"~")
   formu2 <- paste(X,sep="+",collapse="+")
   formu3 <- paste(instr,sep="+",collapse="+")
diff --git a/man/select_weight.Rd b/man/select_weight.Rd
index 95efdba..1a74ed2 100644
--- a/man/select_weight.Rd
+++ b/man/select_weight.Rd
@@ -10,7 +10,7 @@ select_weight(
   X = NULL,
   instr = NULL,
   type.res = "deviance",
-  std = T
+  std = F
 )
 }
 \arguments{