我最近升级到R版本4.0.2和RStudio 1.3.1056,我认为这可能是这个问题的根源。在复制了我的Shiny代码的一部分以创建一个最小可重复示例(mprex)后,我得到了一个不在mprex中的代码部分的错误。我清空了RStudio工作区,重新启动了计算机和RStudio,但仍然出现同样的错误。
这是我的代码:
library(shiny)
# Define UI
ui <- (fluidPage
(
fileInput("sessionFileName", "Session File Name")
)
)
# Define server logic
server <- (function(input, output, session)
{
inputParameters <- reactive ({
if (is.null(input$sessionFileName)) return
inFile <- input$sessionFileName
if (!is.null(inFile)) {
inputData <- readRDS(file=inFile$name)
}
inputIDs <- names(inputData)
inputvalues <- unlist(inputData)
for (i in 1:length(inputData)) {
print (paste(inputIDs[i],inputvalues[[i]],sep=' '))
session$sendInputMessage(inputIDs[i], list(value=inputvalues[[i]]) )
}
})
})
# Start the shiny app
shinyApp(ui = ui, server = server)
这是我尝试运行代码时遇到的错误:
Error in reqHistoricalData(tws, twsEquity(equity), yesterday4PM, backtestFrequency, :
could not find function "reqHistoricalData"
很明显,这个错误与我试图运行的代码无关。我意识到我的代码可能还有其他错误。启动代码时出现错误。我的猜测是,在另一台机器上运行此代码的人不会遇到同样的错误,但我还不知道这是否属实。
这是我开始RStudio会话时的启动横幅。
R version 4.0.2 (2020-06-22) -- "Taking Off Again"
Copyright (C) 2020 The R Foundation for Statistical Computing
Platform: x86_64-apple-darwin17.0 (64-bit)
R is free software and comes with ABSOLUTELY NO WARRANTY.
You are welcome to redistribute it under certain conditions.
Type 'license()' or 'licence()' for distribution details.
Natural language support but running in an English locale
R is a collaborative project with many contributors.
Type 'contributors()' for more information and
'citation()' on how to cite R or R packages in publications.
Type 'demo()' for some demos, 'help()' for on-line help, or
'help.start()' for an HTML browser interface to help.
Type 'q()' to quit R.
[Workspace loaded from ~/Library/MobileDocuments/com~apple~CloudDocs/r Dev/.RData]
对于启动横幅的最后一行“[Workspace loaded from ~…]”,我不明白是否有办法删除和/或重置正在加载的工作区。也许这就是解决这个问题的办法。
我的环境中确实有许多软件包,包括IBroker,此错误所指的就是这些软件包。我一直在运行其他访问该功能的Shiny脚本
reqHistorical数据()
.
这是Shiny和/或R中的错误吗?您对如何运行此代码有什么想法吗?
