if (FALSE) {
# log to a file
temp_file <- tempfile()
smdocker_log(file = temp_file)
# change log threshold to INFO
smdocker_log(level = 3L)
# reset to default config
smdocker_log()
# options() equivalents:
# log to a file
temp_file <- tempfile()
options(smdocker.log_file = temp_file)
# change log threshold to INFO
options(smdocker.log_level = 3L)
}
Run the code above in your browser using DataLab