R中的Twitter粉丝在cat中返回错误

Question

我正在尝试使用R来获取Twitter用户及其关注者 代码在R中正常运行但在尝试为此创建闪亮的应用程序时遇到错误。错误是：

警告：cat中的错误：参数1（类型＆＃39;关闭＆＃39;）无法由cat＆＃39; 处理 在下面的代码中

server.R

    shinyServer(function(input, output) {
      rawData <- reactive({
        follow <- Reduce(intersect,
  list(getUser(input$User1)$getFriendIDs(),getUser(input$User2)$getFriendIDs()))
              follow <- list(follow)
            })
          output$table <- renderText({rawData()})
        })

ui.R

library(shiny)

shinyUI(fluidPage(
  # Application title
  titlePanel("t n"),
  sidebarLayout(
      sidebarPanel(textInput("User1", "What to Search"),
                  (textInput("User2", "U2 to Search")),
                  submitButton(text = "Run")),

      mainPanel(
       textOutput("table")
    )
  )
))