if (interactive()) {
highlighter::highlighter(
"print('Hello, world!')\ncat <- \"Aristofanes\"\nstr(some_variable)",
language = "r",
plugins = list(
highlight(
range = "1-2"
)
)
)
}
Run the code above in your browser using DataLab