file.exists(...) is not TRUE

`actual`:   FALSE
`expected`: TRUE

templates_all <- list.files(system.file("rmarkdown", "templates", package="stevetemplates"))
expect_true(file.exists(system.file("rmarkdown", "templates", i, "resources", "template.tex", package = "stevetemplates")))
expect_true(file.exists(system.file("rmarkdown", "templates", i, "resources", "template.html", package = "stevetemplates")))
expect_true(file.exists(system.file("rmarkdown", "templates", i, "resources", "template.docx", package = "stevetemplates")))