所以我有一个使用创建的数据表的预测应用程序。我将所有文件都放在同一个目录中。当我在 shinyapps 中运行应用程序时,应用程序会显示,但应用程序不会响应用户输入(或者它会显示)。但是,如果我关闭浏览器并在一分钟左右再次打开,应用程序就会工作。该应用程序在 RStudio 中正确运行。
# Top of global.R
library(data.table)
library (plyr)
library(stringr)
library(tm)
load("ngramd.RData")
nxtwd <- function(input=input) {
input <- tolower(input)
input <- iconv(input, "latin1", "ASCII", sub="")
input <- removePunctuation(input)
# Top portion of server.R
library(shiny)
shinyServer(function(input, output,session) {
observe({
if (nchar(as.character(input$text)) > 0) {
我还在 shinyServer 上方添加了 load 语句并得到了相同的响应。
我正在使用 RStudio 和 Windows 10。