Question

我是R发光的初学者。我需要在不同的函数调用中使用文本输入，它在大多数时间显示错误。首先我打印输入值，它工作正常。但是如果我尝试使用它一个函数，它说一些错误。如何使用它们作为我们在其他语言中使用的正常变量？

server.R

shinyServer(function(input, output) {
output$sstock_name <- renderText(input$stock_name)    
av_api_key("YOUR_API_KEY")
sri1 <- data.frame(av_get(symbol = sstock_name, av_fun =     
"TIME_SERIES_DAILY",interval = "15min", outputsize = "compact"))    
})

ui.R

shinyUI(fluidPage(
titlePanel("Stock prediction"),
sidebarLayout(
sidebarPanel(
  textInput(inputId = "stock_name",label = "Enter the stock 
  name",value = "MSFT")
),
mainPanel(
  h2("Stock data"),
  textOutput("sstock_name")
)
)
))

错误：警告：av_get：object＆＃39; stock_name＆＃39;未找到堆栈跟踪（最里面的第一个）： 44：av_get 43：data.frame 42：服务器[/ home / jeyakumar /文件/项目/股票预测/ Star / server.R＃28] 1：shiny :: runApp av_get出错（符号= stock_name，av_fun =＆＃34; TIME_SERIES_DAILY＆＃34;，interval =＆＃34; 15min＆＃34;，： object＆＃39; stock_name＆＃39;找不到

操作R Shiny服务器中的textInput

0 个答案: