간단한 반짝 반짝 빛나는 오디오 파일 예제가 렌더링되지 않습니다

Question

반짝이에 오디오 및 비디오 태그의 기본 설정조차도 약간의 어려움이 있습니다. 파일이 올바른 위치에있는 것처럼 보이지만 출력이 렌더링되지 않고 다른 입력 (예 : 컨트롤 표시)이 무시됩니다.

다음은 간단한 재현 가능한 예입니다. 이 소스 파일이 저장된 작업 디렉토리에는 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)에 따라 모든 것이 올바른 위치에있는 것처럼 보이지만 오디오 태그 (요청 된 컨트롤조차도)는 렌더링되지 않습니다.

Answer 1

프로그램에 문제가 없습니다. 내가 발견 한 유일한 문제는 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) { 
    }) 
))