Mise en place projet R

2026-06-08 16:16:27 +02:00
commit 265e5f1db6
27 changed files with 12697 additions and 0 deletions
@@ -0,0 +1,13 @@
+  #' Logging minimaliste (stdout)
+  log_info <- function(msg, ...) {
+    cat(sprintf('[INFO ] %s - %s
+', format(Sys.time(), '%Y-%m-%d %H:%M:%S'), sprintf(msg, ...)))
+  }
+  log_warn <- function(msg, ...) {
+    cat(sprintf('[WARN ] %s - %s
+', format(Sys.time(), '%Y-%m-%d %H:%M:%S'), sprintf(msg, ...)))
+  }
+  log_error <- function(msg, ...) {
+    cat(sprintf('[ERROR] %s - %s
+', format(Sys.time(), '%Y-%m-%d %H:%M:%S'), sprintf(msg, ...)))
+  }