Uses rmarkdown's render function to render a html-report of the given package.
makeReport(repo, outputFile, showCode = FALSE)
(Repository)
Repository object.
(character)
Path to html-file.
(logical: FALSE)
Logical to show code or not in the report.
(NULL
)
# \donttest{
fetchedRepo <- tryCatch(
{
# Set dir to clone repository to.
tempDir <- tempdir()
pathToRepo <- file.path(tempDir, "glue")
# Clone repo
git2r::clone(
url = "https://github.com/darwin-eu/IncidencePrevalence.git",
local_path = pathToRepo
)
# Create instance of Repository object.
repo <- PaRe::Repository$new(path = pathToRepo)
# Set fetchedRepo to TRUE if all goes well.
TRUE
},
error = function(e) {
# Set fetchedRepo to FALSE if an error is encountered.
FALSE
},
warning = function(w) {
# Set fetchedRepo to FALSE if a warning is encountered.
FALSE
}
)
#> cloning into 'C:\Users\MVANKE~1\AppData\Local\Temp\RtmpwNkTBX/glue'...
if (fetchedRepo) {
# Run makeReport on the Repository object.
makeReport(repo = repo, outputFile = tempfile())
}
# }