Pretty simple question, but I can't figure out how to save the actual animated map so that I can send it to people. I've created an animated map in R using ggplot2, but I can't seem to just save it as a gif or jpg or whatever I'm supposed to save it as in order to send it to people (i.e. my boss).
How can I do this? It seems like it should be very easy, but I'm having no luck.
File_I_Used <- file.choose(new = TRUE)
origAddress <- read.csv(File_I_Used, header = TRUE, stringsAsFactors = FALSE)
head(origAddress)
Closing.Date Year   Qtr          lon      lat
1       2004/9 2004 4-Mar    -93.26686 44.96116
2       2004/9 2004 4-Mar     -93.26686 44.96116
3      2004/10 2004 4-Apr    -93.26686 44.96116
4      2004/11 2004 4-Apr     -93.27559 44.93343
5      2004/11 2004 4-Apr   -93.25080 44.95893
6      2004/11 2004 4-Apr    -93.25087 44.95885
City <- ggmap(get_googlemap(center = c(lon = -93.2638397, lat = 44.979969),
                                   zoom = 12, scale = 2,
                                   maptype = "roadmap",
                                   color = "color"))
City
Properties <- data.frame(origAddress)
Properties
Final_View <- City + theme(legend.position = "none", axis.ticks.x = element_blank(), axis.ticks.y = element_blank(),
                                  axis.text.x = element_blank(), axis.text.y = element_blank()) + 
  geom_point(aes(x = lon, y = lat, color = "Year"), data = Properties, size = 2) +
  transition_states(Year, transition_length = 0) +
  shadow_mark(past = TRUE) +
  labs(title = "My Title")
Final_View
