title: How can I solve my blank screen problem while deploying my shiny app?
body: <p>I'm trying to deploy a shiny app, acording the following article: <a href="https://www.r-bloggers.com/deploying-desktop-apps-with-r/" rel="nofollow noreferrer">https://www.r-bloggers.com/deploying-desktop-apps-with-r/</a>.</p>
  
  <p>When I run my program, the Chrome initiates, but I got nothing, only a blank screen.</p>
  
  <p>This is my shiny app, called runShinyApp.R:</p>
  
  <pre><code>library(shiny)
  message('library paths:\n', paste('... ', .libPaths(), sep='', collapse='\n'))
  
  chrome.portable = file.path(getwd(),
                              'GoogleChromePortable/App/Chrome-bin/chrome.exe')
  
  launch.browser = function(appUrl, browser.path=chrome.portable) {
    message('Browser path: ', browser.path)
    shell(sprintf('"%s" --app=%s', browser.path, appUrl))
  }
  
  shiny::runApp('./shiny/', launch.browser=launch.browser)
  </code></pre>
  
  <p>My server file:</p>
  
  <pre><code>library(shiny)
  server &lt;- function(input, output, session) {
    # MODIFY CODE BELOW: Wrap in observeEvent() so the help text 
    # is displayed when a user clicks on the Help button.
    observeEvent(input$show_help, {
      # Display a modal dialog with bmi_help_text
      # MODIFY CODE BELOW: Uncomment code
      showModal(modalDialog(bmi_help_text))
    })
    rv_bmi &lt;- eventReactive(input$show_bmi, {
      input$weight/(input$height^2)
    })
    output$bmi &lt;- renderText({
      bmi &lt;- rv_bmi()
      paste("Hi", input$name, ". Your BMI is", round(bmi, 1))
    })
  }
  
  
  </code></pre>
  
  <p>My ui file:</p>
  
  <pre><code>library(shiny)
  bmi_help_text &lt;- ""
  ui &lt;- fluidPage(
    titlePanel('BMI Calculator'),
    sidebarLayout(
      sidebarPanel(
        textInput('name', 'Enter your name'),
        numericInput('height', 'Enter your height in meters', 1.5, 1, 2),
        numericInput('weight', 'Enter your weight in Kilograms', 60, 45, 120),
        actionButton("show_bmi", "Show BMI"),
        # CODE BELOW: Add an action button named "show_help"
        actionButton("show_help", "Help")
      ),
      mainPanel(
        textOutput("bmi")
      )
    )
  )
  
  </code></pre>
  
  <p>The error screen:
  <a href="https://i.stack.imgur.com/SxaX6.png" rel="nofollow noreferrer"><img src="https://i.stack.imgur.com/SxaX6.png" alt="The error screen"></a> </p>