From 1e5086a2b6a5b0af2be3111aa33d693f9bb8892d Mon Sep 17 00:00:00 2001
From: Jan Wijffels <jwijffels@bnosac.be>
Date: Thu, 3 Jan 2019 11:20:19 +0100
Subject: [PATCH] Use Rprintf instead of printf

---
 src/Starspace/src/starspace.cpp | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/src/Starspace/src/starspace.cpp b/src/Starspace/src/starspace.cpp
index 31bd1ae..7cf5cce 100644
--- a/src/Starspace/src/starspace.cpp
+++ b/src/Starspace/src/starspace.cpp
@@ -186,9 +186,9 @@ void StarSpace::train() {
     auto err = model_->train(trainData_, args_->thread,
            t_start,  i,
            rate, rate - decrPerEpoch);
-    //printf("\n ---+++ %20s %4d Train error : %3.8f +++--- %c%c%c\n",
-    //       "Epoch", i, err,
-    //       0xe2, 0x98, 0x83);
+    Rprintf("\n ---+++ %20s %4d Train error : %3.8f +++--- %c%c%c\n",
+           "Epoch", i, err,
+           0xe2, 0x98, 0x83);
     if (validData_ != nullptr) {
       auto valid_err = model_->test(validData_, args_->thread);
       Rcpp::Rcout << "\nValidation error: " << valid_err << endl;