library(logr)

lf <- log_open()


log_print("Hello")


stop("stop me")
#warning("a warning message")

log_close()