# NOT RUN {
lg <- get_logger("test")
lg$info("lorem ipsum")
as.data.frame(lg$last_event)
lg$info("LogEvents can store any custom log values", df = iris)
as.data.frame(lg$last_event)
head(as.data.frame(lg$last_event)$df[[1]])
# }
Run the code above in your browser using DataLab