title: Shiny app does not reflect changes in update RData file
body: <p>I update my RData file on daily basis through a cron job for my shiny apps.
  However, shiny apps does not pick updates most of the time and keep showing the old data from old RData file.</p>
  
  <p>Here is the minimum reproducible example. It works fine when <strong><em>data_processing.R</em></strong> is executed from my desktop. However, when it is done on a Rshiny server, shiny app does not read updated date and time stamp. </p>
  
  <p><strong>data_processing.R</strong></p>
  
  <pre><code>rm(list=ls())
  df &lt;- iris
  data_update_date_time &lt;- Sys.time()
  save.image("working_dataset.RData", compress = TRUE)
  </code></pre>
  
  <p><strong>server.R</strong></p>
  
  <pre><code>load("working_dataset.RData")
  
  function(input, output, session) {
  
    # Combine the selected variables into a new data frame
    selectedData &lt;- reactive({
      df[, c(input$xcol, input$ycol)]
    })
  
    clusters &lt;- reactive({
      kmeans(selectedData(), input$clusters)
    })
  
    output$plot1 &lt;- renderPlot({
      palette(c("#E41A1C", "#377EB8", "#4DAF4A", "#984EA3",
                "#FF7F00", "#FFFF33", "#A65628", "#F781BF", "#999999"))
  
      par(mar = c(5.1, 4.1, 0, 1))
      plot(selectedData(),
           col = clusters()$cluster,
           pch = 20, cex = 3)
      points(clusters()$centers, pch = 4, cex = 4, lwd = 4)
    })
  
    ## Data update date and time stamp
    output$update_date_time &lt;- renderPrint(data_update_date_time)
  
  }
  </code></pre>
  
  <p><strong>ui.R</strong></p>
  
  <pre><code>pageWithSidebar(
    headerPanel('Iris k-means clustering'),
    sidebarPanel(
      selectInput('xcol', 'X Variable', names(iris)),
      selectInput('ycol', 'Y Variable', names(iris),
                  selected=names(iris)[[2]]),
      numericInput('clusters', 'Cluster count', 3,
                   min = 1, max = 9),
      br(),
      h4("Date update date time"),
      textOutput("update_date_time")
    ),
    mainPanel(
      plotOutput('plot1')
    )
  )
  </code></pre>
  
  <p>Thanks for taking your time.</p>