Independientemente de mi comentario puedo mostrarte como "anular" dos tipos de mensajes clásicos que se usan en todas la funciones: los prints y los warnings. El escenario sería esto:
str(mtcars);warning("Un Warning")
Los dos tipos de "mensajes" necesitan un enfoque distinto, en el caso del print
o salida estándar, hay que usar capture.output()
y en el caso de los warnings, se puede usar suppressWarnings()
. El truco sería "envolver" el código de tu Script mediante algo así:
redirect_messages <- function(f, file = nullfile()){
express <- substitute(f)
return(
capture.output(
suppressPackageStartupMessages(
suppressWarnings(
eval(express)
)), file = file
)
)
}
Y se ejecutaría así:
redirect_messages(
{str(mtcars);warning("testit")}
)
Comentarios:
- La redirección puede enviarse también a un archivo
- Otra posibilidad de solución es intentar redirigir directamente la ejecución del script mediante
>
, acá habría que ver de redirigir la salid estándar y la de error
- Ocultar los warning puede ser problemático eventualmente
- La función no suprime los errores, por ejemplo
stop("Esto es un error")
- La carga de librerías evidentemente muestra las cosas por afuera de un print clásico y un warning, prueba reducir los mensajes mediante
library("paquete", quietly = TRUE)
o en el caso de tidyverse
podemos usar suppressPackageStartupMessages()
(acabo de editar la función para agregar esta función a mi respuesta)
print
específicos, ¿podrías compartir algún ejemplo de comando y salida?