部署闪亮的应用程序不显示 ggvis 图答案

【问题标题】：Deploying shiny app not displaying ggvis graph部署闪亮的应用程序不显示 ggvis 图
【发布时间】：2016-01-16 20:16:23
【问题描述】：

我正在尝试部署我创建的闪亮应用。它在本地完美显示，但在部署时无法正确显示。我有以下 ui 和服务器脚本：

# ui.R
library("shiny")
library("ggvis")
shinyUI(fluidPage(
titlePanel("Barcelona Wine Menu"),

sidebarLayout(
sidebarPanel(
  helpText("Display information about the selected variable"),

  selectInput("var", 
              label = "Choose a variable to display",
              choices = c("mpc", "mpv"),                 
              selected = "mpc")
),

mainPanel(
  ggvisOutput("meanpc")


)
)
))
# server.R
library("shiny")
library("ggvis")
shinyServer(
function(input, output) {
mpc <- mean.price.country
mpv <- mean.price.vintage


selection <- reactive({ifelse (input$var=="mpc", return(mpc), return(mpv))})

observe({
  selection() %>%
    ggvis(~V1, ~V2) %>%
    layer_bars() %>%
    bind_shiny("meanpc" )
})})

部署时，我看到第二张图片不像我在本地运行时那样显示数据。我无法找到类似的问题，因为大多数是错误。有谁知道为什么这没有正确部署？我已经阅读了 shinyapp.io 文档并按照这些步骤操作，但无济于事。谢谢你。

【问题讨论】：

尝试部署一个没有数据的静态版本（全是假数据）。如果可行，您就知道是数据读取失败（这是 shiny.io 上的常见问题 - 请注意，您无法控制系统特定的变量）。 OTOH，如果它仍然失败，您可以通过逐步消除功能和代码来继续，直到找到原因。这就是我调试它的方式。
应用程序灰显，这表明错误终止了会话。请发布日志。

标签： r shiny ggvis

【解决方案1】：

答案是 Mike Wise 建议的第一个故障排除步骤。我使用的数据存储在我的环境中“本地”。当我将此发布到 Shiny 时，它无法识别数据。我所做的只是在工作目录文件夹中创建一个 Excel 表，然后将该数据导入我上面编写的函数中。

【讨论】：