13 lines
199 B
R
13 lines
199 B
R
h3 <- function(x) {
|
|
cat("\n---", x, "\n")
|
|
}
|
|
|
|
|
|
|
|
format_js <- function(x) {
|
|
if (!requireNamespace("js", quietly = TRUE)) {
|
|
return(x)
|
|
}
|
|
js::uglify_reformat(x, beautify = TRUE)
|
|
}
|