Когда я запускаю следующий app.R
файл, все работает отлично.
library(shinydashboard)
ui <- dashboardPage(
dashboardHeader(title = "Basic dashboard"),
dashboardSidebar(),
dashboardBody(
# Boxes need to be put in a row (or column)
fluidRow(
box(plotOutput("plot1", height = 250)),
box(
title = "Controls",
sliderInput("slider", "Number of observations:", 1, 100, 50)
)
)
)
)
server <- function(input, output) {
set.seed(122)
histdata <- rnorm(500)
output$plot1 <- renderPlot({
data <- histdata[seq_len(input$slider)]
hist(data)
})
}
shinyApp(ui, server)
Это выглядит так:
Однако при развертывании его на моем shiny-server
, работающем на экземпляре AWS, он не отображается должным образом. Я думаю, что это должно быть что-то с shinydashboard
, потому что у меня есть другие блестящие приложения, работающие на сервере, и они работают просто отлично. Единственные приложения, которые имеют эту проблему, это приложения, которые я пытаюсь развернуть, которые используют shinydashboard
. Он установлен на сервере, поэтому я не уверен, чего мне не хватает. Вот как это выглядит на сервере:
EDIT ::
Это также, кажется, прекрасно работает на shinyapps.io
. Так что это должно быть что-то с моим сервером AWS Ubuntu и shinydashboard
. У меня установлено и его ‘0.7.1’
версия пакета. Что бы это могло быть?
В логах сервера блеска ничего нет. Вот приложение-лог