From 54d3dc12e5f25aa4bf205ed310dbbcb0dd89165c Mon Sep 17 00:00:00 2001 From: alexkowa Date: Mon, 15 Jul 2024 11:45:09 +0200 Subject: [PATCH] remove print in gowerD --- R/gowerD.R | 1 - 1 file changed, 1 deletion(-) diff --git a/R/gowerD.R b/R/gowerD.R index 83bc2ca..84629b7 100644 --- a/R/gowerD.R +++ b/R/gowerD.R @@ -99,7 +99,6 @@ gowerD <- function(data.x, data.y = data.x, 2,min0,na.rm=TRUE) rmax <- apply(rbind(data.x[,numerical,drop=FALSE], data.y[,numerical,drop=FALSE]),2,max1,na.rm=TRUE) - print(c(rmin,rmax)) }else if(methodStand == "iqr"){ rmin <- apply(rbind(data.x[,numerical,drop=FALSE],data.y[,numerical,drop=FALSE]),2,quantile,na.rm=TRUE, probs=.25)