r shiny标签$ video不显示视频

时间:2017-07-10 14:53:59

标签: r video shiny

我想在闪亮的输出中播放mp4视频。当我双击文件名时,它在我的电脑上运行正常。我将文件复制到主app文件夹下面的www文件夹中。我尝试过以下代码的变体。

library(shiny)
library(shinyjs)
ui <- fluidPage(
  useShinyjs(debug = TRUE),
  mainPanel(
    "video test",
    uiOutput('ozoneVideo'), id = "mainPanel")
)

server <- function(input, output, session) {
  output$ozoneVideo <- renderUI({
   h6("ozone video", tags$video(src = "MesaCountyOzone2017_07_10.mp4",  type = "video/mp4", width = "1080px", height = "480px", controls = "controls", autoplay = NA))
  })
}
shinyApp(ui = ui, server = server)

生成的网页显示文本元素(视频测试,臭氧视频)和水平栏,带有视频播放按钮和单词&#34;错误&#34;没有解释。 javascript控制台中没有出现错误。

当我将www /添加到文件名时,javascript控制台有一条错误消息&#34;无法加载资源:服务器响应状态为404(未找到)且网址为http://127.0.0.1:4817/www/MesaCountyOzone2017_07_10.mp4 < / p>

任何帮助澄清这一点非常感谢!

更新:2017年7月11日。 我现在很确定这是Safari的一个问题。我选择运行外部运行应用程序。在Safari中打开的网页在视频控制部分中显示错误消息。如果我将网址和过去复制到Chrome网页,则视频播放正常。

所以我现在的问题是如何在Safari ???中进行这个游戏

0 个答案:

没有答案