Я новичок в использовании блестящего в R. Я пытаюсь развернуть приложение, которое я создал, которое работает на моей стороне, но не работает, когда я пытаюсь развернуть его. Вместо этого я получаю страницу ошибки с зелеными буквами, говорящими:
ошибка в значении [3L]: menu () не может использоваться неинтерактивно
Я использую один файл app.R, который имеет загружены следующие библиотеки:
library(shiny)
library(ggplot2)
library(dplyr)
library(ngram)
library(randomForest)
# Install spacyr
library(spacyr)
spacy_install()
spacy_initialize()
require(gridExtra)
require(xml2)
library(tidyverse)
library(quanteda)
library(readtext)
library(readr)
library(reshape2)
library(ggpubr)
library(DescTools)
library(corpus)
library(shinycssloaders)
library(cowplot)
library(yaml)
app.R содержит следующий пользовательский интерфейс:
ui <- fluidPage(
titlePanel("some text here"),
sidebarLayout(
sidebarPanel(
textAreaInput("some more text here", height="800px"),
actionButton("run", label = "text")
),
mainPanel(
withSpinner(plotOutput("graph1")), withSpinner(plotOutput("graph2")), withSpinner(plotOutput("graph3"))
)
)
)
, а затем следующий сервер:
server <- shinyServer(function(input, output){
observeEvent(input$run, {
dataInput <- reactive({
nyxlong <- text2pred(input$text)
})
# Graph 1
output$graph1 <- renderPlot({
# Code to create ggplot #1
})
output$graph2 <- renderPlot({
nyxlong <- dataInput()
# Code to create second ggplot
})
output$graph3 <- renderPlot({
nyxlong <- dataInput()
# Code to create third ggplot
})
})
})
Мой инстинкт инстинктивен что есть библиотеки, которые shinyapps.io не умеет использовать. Есть ли другие проблемы с gui или функциями сервера? Есть ли другие пакеты, которые нужно загружать другим способом?
Спасибо.