I have a motion chart created with the following code:
M1 <- gvisMotionChart(populationData, idvar = "Region", timevar = "Year") plot(M1)