library(googleVis)
## 
## Welcome to googleVis version 0.5.9
## 
## Please read the Google API Terms of Use
## before you start using the package:
## https://developers.google.com/terms/
## 
## Note, the plot method of googleVis will by default use
## the standard browser to display its output.
## 
## See the googleVis package vignettes for more details,
## or visit http://github.com/mages/googleVis.
## 
## To suppress this message use:
## suppressPackageStartupMessages(library(googleVis))

teste2

M <- gvisMotionChart(Fruits, "Fruit", "Year", options=list(width=550, height=450))
print(M, 'chart')