Question

我刚开始使用r时遇到问题。我尝试将URL的输入传递给rcrawler，然后创建闪亮的图形。不幸的是，我一次又一次出错

library(shiny)
library(Rcrawler)
library(igraph)

ui <- fluidPage(

  textInput("text", "Text:", "text here"),
  submitButton("Submit"),

  column(6,plotOutput("plot1", width = 400, height = 300),
  verbatimTextOutput("text")
  )
)

server <- function(input, output, session) {

Rcrawler(Website = input$text, no_cores = 4, no_conn = 4 , NetworkData = TRUE, NetwExtLinks =FALSE,  statslinks = TRUE)

output$list <- renderPlot({
    network<-graph.data.frame(NetwEdges, directed=T)
    plot(network)

  })
}

shinyApp(ui, server)

听http://127.0.0.1:6534   警告：.getReactiveEnvironment（）$ currentContext中的错误：如果没有活动的反应性上下文，则不允许进行操作。（您尝试做只能从反应式表达式或观察器内部完成的操作。）
   57：停止
   56：.getReactiveEnvironment（）$ currentContext
   55：getCurrentContext
   54：.subset2（x，“ impl”）$ get
   53：$。reactivevalues
   47：服务器[C：\ WD-R-Studio / app.R＃15]
  .getReactiveEnvironment（）$ currentContext（）中的错误：
    没有活动的响应上下文，不允许进行操作。（您尝试做只能从反应式表达式或观察器内部完成的操作。）

如何将带有变量的Shiny textinput传递给rcrawler

0 个答案: