#' Generate report via UI
#'
#' @param template An alternative template, if required
#' @param ... Additional arguments to [rmarkdown::render()]
#'
#' @export
#'
#' @examples
#' \dontrun{
#' generateReport.UI()
#' }
generateReport.UI<-function(template=NULL, ...){
if(is.null(template))
template <- system.file("templates","PackageReview.Rmd"
, package = "PackageReviewR")
rmarkdown::render(template, params = "ask", ...)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.