From a9bd4d8d68387aaba40292a912689983a2ed84f1 Mon Sep 17 00:00:00 2001
From: Valentin Kaisermayer
 <50108075+ValentinKaisermayer@users.noreply.github.com>
Date: Tue, 13 May 2025 12:30:49 +0200
Subject: [PATCH] changes prints to @info

---
 src/fuzzycmeans.jl | 2 +-
 src/kmeans.jl      | 6 +++---
 src/kmedoids.jl    | 6 +++---
 3 files changed, 7 insertions(+), 7 deletions(-)

diff --git a/src/fuzzycmeans.jl b/src/fuzzycmeans.jl
index 5df6d3f4..36fcf397 100644
--- a/src/fuzzycmeans.jl
+++ b/src/fuzzycmeans.jl
@@ -136,7 +136,7 @@ function _fuzzy_cmeans(
         copyto!(prev_centers, centers)
         iter += 1
         if displevel >= 2
-            @printf("%7d %18.6e\n", iter, δ)
+            @info("$(iter) $(δ)")
         end
     end
 
diff --git a/src/kmeans.jl b/src/kmeans.jl
index efb2171d..e6ccb10c 100644
--- a/src/kmeans.jl
+++ b/src/kmeans.jl
@@ -195,15 +195,15 @@ function _kmeans!(X::AbstractMatrix{<:Real},                # in: data matrix (d
 
         # display information (if required)
         if displevel >= 2
-            @printf("%7d %18.6e %18.6e | %8d\n", t, objv, objv_change, num_affected)
+            @info("$(t) $(objv) $(objv_change) $(num_affected)")
         end
     end
 
     if displevel >= 1
         if converged
-            println("K-means converged with $t iterations (objv = $objv)")
+            @info("K-means converged with $t iterations (objv = $objv)")
         else
-            println("K-means terminated without convergence after $t iterations (objv = $objv)")
+            @info("K-means terminated without convergence after $t iterations (objv = $objv)")
         end
     end
 
diff --git a/src/kmedoids.jl b/src/kmedoids.jl
index 338dd7b3..b27aa5b6 100644
--- a/src/kmedoids.jl
+++ b/src/kmedoids.jl
@@ -157,15 +157,15 @@ function _kmedoids!(medoids::Vector{Int},      # initialized medoids
 
         # display progress
         if displevel >= 2
-            @printf("%7d %18.6e %18.6e\n", t, tcost, tcost - tcost_pre)
+            @info("$(t) $(tcost) $(tcost - tcost_pre)")
         end
     end
 
     if displevel >= 1
         if converged
-            println("K-medoids converged with $t iterations (objv = $tcost)")
+            @info("K-medoids converged with $t iterations (objv = $tcost)")
         else
-            println("K-medoids terminated without convergence after $t iterations (objv = $tcost)")
+            @info("K-medoids terminated without convergence after $t iterations (objv = $tcost)")
         end
     end