Папка изображений FlexDashboard rmarkdown удаляет себя - PullRequest
0 голосов
/ 27 февраля 2019

Моя папка с изображениями удаляется сама после первого связывания документа.

Я пробовал self_contained = TRUE в заголовке YAML, не работает.

(я не уверенесли это имеет значение, но Shiny встроен в приборную панель)

Ниже мой код:

---
title : app demo
author : yeshipants
output : 
  flexdashboard::flex_dashboard:
    orientation: rows
    self_contained : TRUE
    source_code: embed
runtime: shiny
---

```{r setup}
knitr::opts_chunk$set(cache = FALSE)
```
```{r loadPackages, cache = TRUE}  
setwd("C:/Users/user/Desktop/Training/OCR")
library(magick)
```
Column {.sidebar data-width=350}
-------------------------------------
### Input & Parameters
```{r inputImages, cache = TRUE}

selectInput("imagesToChoose", 
            label = "Choose an image to process",
            choices = c("Language example 1", 
                        "Language example 2",
                        "Jounal example"),
            selected = "Language example 1") 
```
Row {.tabset}
-------------------------------------  
### Original Image    
```{r displayImage, cache = FALSE}    
renderImage({      
  if (input$imagesToChoose == "Language example 1"){
    list(src = "images/receipt.png", height = 240, width = 300)
  }
  else if(input$imagesToChoose == "Language example 2"){
    list(src = "images/french.JPG", height = 240, width = 300)
  }
  else if(input$imagesToChoose == "Jounal example"){
    list(src = "images/journal.jpg", height = 240, width = 300)
  }    
})

```

1 Ответ

0 голосов
/ 27 февраля 2019

Я думаю, что вы должны сделать:

renderImage({      
  ......
}, deleteFile = FALSE)
...