Added option in select_weight
This commit is contained in:
@ -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="+")
|
||||
|
Reference in New Issue
Block a user