R Markdown: openBinaryFile: does not exist (No such file or directory)

r shiny r-markdown pandoc
ZPeh picture ZPeh · Jan 9, 2018 · Viewed 13.6k times · Source

I've developed a shiny app that allows user to download a HTML report via R Markdown. I'm trying to include custom css and images into my rmarkdown file. However, I keep getting this error message:

pandoc: Could not fetch (either css or image file)
openBinaryFile: does not exist (No such file or directory)

When I knit the .rmd file on R Studio, it is able to reference the image file or css that I want. However, when I run the Shiny app and download the html file, I get the above error message. I've even tried to put the images and css files in the same working directory as the .rmd file, but to no avail...

output:
  html_document:
   css: pandoc.css

(same error message as above)

Been trying to find a solution for this but can't seem to...can anyone help here?

Answer

AColeman picture AColeman · Apr 10, 2019

I just had this issue as well, but for me the reason was that the RStudio project was on a shared drive, and I had opened it through the network location. The problem was resolved when I closed out of the project, and opened it back up through a mapped network drive. (If when you run getwd() your location starts with \\, this is probably what is happening to you.)

Related questions

RMarkdown in Shiny Application

Problem Is there a way to insert (and evaluate) an RMarkdown script in a shiny application. (Note, I am not looking for a shiny application in RMarkdown that is explained here, nor am I looking for Markdown scripts in shiny (…

Read More
Scale and size of plot in RStudio shiny

Related, but only talks about the allocated plot space in general, not how to directly set the plot image size and then scale it to fill the desired space Shiny Chart Space Allocation I'm creating a shiny web app and …

Read More
Change the color and font of text in Shiny App

I am using below code in server.R to display the text in the main panel. This is working exactly the way it should work. output$text1 <- renderText({ if(input$ag == 0) return(NULL) return('First 20 rows for requested …

Read More