# Check status before the log is opened
log_status()
# [1] "closed"
# Create temp file location
tmp <- file.path(tempdir(), "test.log")
# Open log
lf <- log_open(tmp)
# Check status after log is opened
log_status()
# [1] "open"
# Close log
log_close()
Run the code above in your browser using DataLab