14 lines
443 B
R
Executable File
14 lines
443 B
R
Executable File
#' 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, ...)))
|
|
}
|