div容器中的脚本

Question

编辑：基于注释添加“”。该代码现在可以使用。

我正尝试将3D mol浏览器嵌入我的闪亮应用程序中，如下所述： http://3dmol.csb.pitt.edu/doc/tutorial-embeddable.html

我尝试了以下代码：

library(shiny)

ui <- fluidPage(

  mainPanel(
    fluidRow(
         tags$head(HTML('<script src="http://3Dmol.csb.pitt.edu/build/3Dmol-min.js"></script>')),
         tags$div(
                  style="height: 400px; width: 400px; position: relative;",
                  class='viewer_3Dmoljs',
                  'data-pdb' ='1YCR',
                  'data-backgroundcolor' ='0xffffff',
                  'data-style' ='stick'
                  ))
         )
        )

 server <- function(input, output) {


}


shinyApp(ui = ui, server = server)

似乎无法识别data-pdb，data-backgroundcolor和data-style。如果删除这些参数，则会出现黑框。有人知道我该如何工作吗？另外，是否可以将load-pdb定向到本地文件？