r - 将带有实时控件的视频嵌入到交互式 Shiny 环境中

Question

我正在寻找一种使用 R Studio 中的 Shiny 包执行以下操作的方法:

提示用户从主窗口内的计算机中选择视频文件

视频文件然后在带有控件(播放、暂停等)的主窗口中打开

我见过讨论如何从网站嵌入视频的帖子，但我从未见过讨论如何从计算机中选择视频文件，然后在主窗口中使用实时控件打开它们的帖子。

谢谢你的帮助!

Answer 1

添加视频非常容易。为此，请像这样构建您的应用程序:

server.r

library(shiny)
shinyServer(function(input, output, session) {})

ui.r

shinyUI(
  fluidPage(
    tags$video(id="video2", type = "video/mp4",src = "SampleVideo_1280x720_1mb.mp4", controls = "controls")
  )
)

www - 这是你的视频所在，我有 .mp4格式视频，下载自 http://www.sample-videos.com/