ShinyApp для R продолжает «красть» мой вывод изображения

Question

Итак, вот в чем подвох, я работаю над приложением Shiny, которое представляет данные о провинциях Таиланда, поэтому я решила раскрасить разные области карты в зависимости от выбранных провинций , например, .

Это мой код:

//This is in my fluidPage()
    imageOutput("map1")

//This is in my function(input,output)
    output$map1 <- renderImage({
    list(
        src=str_c("images/",str_replace_all(input$province1,pattern=" ",replacement="_"),".png"),
        width=300,
        height=400)
  })

Моя папка "images" находится в той же папке, что и файл R, я также сделал папку "www".

Сначала я сохранил мои изображения в папке «www» исчезли после того, как я их использовал, поэтому я предположил, что приложение сохраняло входные изображения в этой папке и впоследствии удаляло их. Я переместил изображения в папку «images», думая, что избавлюсь от исчезающих файлов, но ничего не исправил: (

Правильно ли я понял, что касается папки «www»? хранить мои изображения в другой папке и «пополнять» папку «изображения» после каждого использования? Есть ли решение для этого?