title: Unable to deploy the googleVis motion chart using R shiny server
body: <p>The motion chart appeared well on my own computer although the chart shows up on the other IE window instead of RStudio's internal window. 
  However, when I used the R Shiny server in order to deploy the googleVis motion chart on web, this error message shows:</p>
  
  <pre><code>  Error: $ operator is invalid for atomic vectors
  </code></pre>
  
  <p>I also checked them using the commands below and it shows they are not atomic:</p>
  
  <pre><code>  &gt;is.recursive(Fruits)
    [1] TRUE
    &gt;is.atomic(Fruits)
    [1] FALSE
  </code></pre>
  
  <p>Reproducible code is as below, I've simplifed it and use the internal data "fruit" to demo it; the problem is still there, the motion chart did not show in the same window but appear in another window in IE9. 
  And when deployed using shiny-server, it become worses, motion chart did not appear at all and shows the same error message</p>
  
  <h1>Server. R</h1>
  
  <pre><code>  library(googleVis)
    library(shiny)
    shinyServer(function(input, output) {
      output$motionchart2 &lt;- renderGvis({
       M1 &lt;- gvisMotionChart(Fruits, idvar="Fruit", timevar="Year")
       plot(M1)
     })
    })
  </code></pre>
  
  <h1>UI.R</h1>
  
  <pre><code>  library(shiny)
    library(googleVis)
    shinyUI(fluidPage(
    titlePanel("Analysis"),
    mainPanel(
     navlistPanel(
      tabPanel("MotionChart",h1("Motion Chart"),tableOutput("motionchart2"))
    )
   )
   ) 
   )
  </code></pre>