Modify function rmd2html