2016-09-07 77 views
0

即使在闪亮的中的音频和视频标签的基本设置,我也有一些困难。它看起来像文件在正确的位置,但是没有输出被渲染,许多其他输入(如显示控件)被忽略。简单闪亮的音频文件示例不会渲染

这是一个简单的可重复的例子。在存储此源文件的工作目录中,我还有一个www/clip.mp3文件(任何文件都可以复制此问题)。

library(shiny) 

app <- list(ui = shinyUI(fluidPage(
    textOutput('text'), 
    tags$audio(src = "clip.mp3", type = "audio/mp3", 
       autoplay = TRUE, controls = TRUE) 
) 
), 
    server = shinyServer(function(input, output) { 
     output$text <- renderText({ 
      c(getwd(), file.exists(paste0(getwd(), '/www/clip.mp3'))) 
      }) 
    }) 
) 
runApp(app) 

对我来说,输出显示working/dir/path TRUE,但没有别的。根据文档(http://shiny.rstudio.com/articles/tag-glossary.html),它看起来像所有东西都处于正确的位置,但音频标签(甚至是所请求的控件)没有呈现任何内容。

回答

2

你的程序一切都很好。我发现的唯一问题是使用RStudio查看器运行它,但在使用Chrome浏览器的新窗口启动后,所有操作都很顺利。另外,作为建议,您可以使用addResourcePath函数来使用不同的目录而不是/ www。看下面的例子。

addResourcePath("audio", "c:/temp") 

library(shiny) 

runApp(list(
    ui = shinyUI(fluidPage(
    tags$audio(src = "audio/clip.mp3", type = "audio/mp3", 
       autoplay = TRUE, controls = TRUE) 
)), 
    server = shinyServer(function(input, output) { 
    }) 
)) 
+0

谢谢,关于Rstudio的观点很有道理,并且最初把我抛弃了。您在真蓝色浏览器中启动时是正确的,您的示例工作正常。除非我明确添加'addResourcePath(“www”,“path/to/www”)',并使用'www/clip.mp3' ....这很奇怪,因为我认为这是在该路径默认。否则,只显示控件,但mp3文件不可播放。 – philchalmers