Shiny 使人耳目一新的或使人兴奋的

Shiny 使人耳目一新的或使人兴奋的,shiny,Shiny,我使用“观察”从模拟中创建png文件,然后使用renderUI作为滑块动画显示png文件。现在,对不同的样本大小进行此操作,png文件名包括样本大小-例如RplotSS2step1.png。。。RplotSS2step20.png,样本量为2。第一次选择样本大小时,所有工作正常,但当稍后重新选择相同的样本大小时,会创建新的png文件(不同的模拟),但会重新显示旧的png文件(不再存在于图像目录中) 当重复使用相同的文件名时,有没有办法让renderUI“重新映像”。如果我在文件名中添加一个随机标

我使用“观察”从模拟中创建png文件,然后使用renderUI作为滑块动画显示png文件。现在,对不同的样本大小进行此操作,png文件名包括样本大小-例如RplotSS2step1.png。。。RplotSS2step20.png,样本量为2。第一次选择样本大小时,所有工作正常,但当稍后重新选择相同的样本大小时,会创建新的png文件(不同的模拟),但会重新显示旧的png文件(不再存在于图像目录中)

当重复使用相同的文件名时,有没有办法让renderUI“重新映像”。如果我在文件名中添加一个随机标记,使它们总是唯一的,我将不得不自动删除它们,这似乎有风险

Nimgurl <- reactive({
  i=input$Nmyslider
  samplesize=input$num
  return(paste0("./images/RplotSS",samplesize,"step",i,".png"))
 })
output$Nui <- renderUI({
  tags$div(
     tags$img(src = Nimgurl())
   )
 })

Nimgurl我不知道这是否是最好的解决方案。我用
renderImage
解决了这个问题,并使用了dinamic替代文本

 output$image<-   renderImage({

                            # Return a list containing the filename
                                    list(src = Nimgurl(),
                                     contentType = 'image/png',
                                     alt = ndg())
                                  }, deleteFile = T)    
div(imageOutput("roi"))