Unverified Commit ff37db08 authored by Francois Michonneau's avatar Francois Michonneau
Browse files

remove extra line return in knitr output

parent 9bfebc4d

bin/chunk-options.R

+2 −0
Original line number Diff line number Diff line
@@ -27,12 +27,14 @@ hook_in <- function(x, options) { 
}



hook_out <- function(x, options) {

  x <- gsub("\n$", "", x)

  stringr::str_c("\n\n~~~\n",

                   paste0(x, collapse="\n"),

                 "\n~~~\n{: .output}\n\n")

}



hook_error <- function(x, options) {

  x <- gsub("\n$", "", x)

  stringr::str_c("\n\n~~~\n",

                 paste0(x, collapse="\n"),

                 "\n~~~\n{: .error}\n\n")