powered by
"start"(x, ...) finish(x, ...) "finish"(x, ...)
## The input is red (if color is supported) get_name <- function() { cat("Enter your name:", start(red)) input <- readline() cat(finish(red)) input } name <- get_name() name
Run the code above in your browser using DataLab