R Markdown输出PDF和HTML

如果在PDF和HTML两种情况下都确实需要页面处理，则tidyPrint在最后一步应该有所不同。

tidyPrint <- function(data) {
content <- paste0(data,collapse = "\n\n")
content <- str_replace_all(content,"\\t"," ")
content <- str_replace_all(content,"\\ ","\\\\ ")
content <- str_replace_all(content,"\\$","\\\\$")
content <- str_replace_all(content,"\\*","\\\\*")
content <- str_replace_all(content,":",": ")
return(paste("<code>",content,"</code>\n"))
}

HTML Result in the mixed version

它不是完美的，但也许足够好。