Add the presentation code in RStudio presenter and the html file generated