R Shiny 中的嵌入式 Twitter 时间线

Question

我正在使用 R shiny 创建一个梦幻足球应用程序，我想做的一件事是将 Twitter 列表嵌入到主页中，其中包含最新的梦幻足球新闻。我遵循了早先帖子 How can I embed a twitter timeline in a Shiny app 的指导，并且能够在几个月前启动并运行时间表。下面是一段相关代码：

    shinyUI(fluidPage(
  navbarPage("Home",
              theme = mycss,
             tabPanel("Home", icon = icon('home'),
                      fluidPage(
                        tags$head(includeScript("www/twittermike.js")),            
                        fluidRow(column(width = 7, img(src = 'home_logo.jpg',
                        width = 200, height = 100, style = "float:left; padding-right:10px"),
                        div(br(),
                        "The Home of The Golden", br(),
                        " - Commisioner Joe"),
                        br(),br(), br(), br(),
                        includeMarkdown("html/overview.Rmd")
                        ),
                        column(width = 5,
                               a(class="twitter-timeline", href="https://twitter.com/POCKETsurACES/lists/fantasy-news", 
                                 src="//platform.twitter.com/widgets.js")))))

twittermike.js 文件定义为：

    !function(d,s,id){var js,fjs=d.getElementsByTagName(s)    [0],p=/^http:/.test(d.location)?\'http\':\'https\';if(!d.getElementById(id)){js=d.createElement(s);js.id=id;js.src=p+"://platform.twitter.com/widgets.js";fjs.parentNode.insertBefore(js,fjs);}}(document,"script","twitter-wjs");    

出于我以外的原因，此代码不再有效。我没有收到任何错误，但没有填充时间线。任何帮助将不胜感激。

Answer 1

你只需要 a(class="twitter-timeline", href="https://twitter.com/POCKETsurACES/lists/fantasy-news")