#install.packages("ggmap")
#install.packages("gridExtra")

library(gridExtra)
library(ggmap)

map1 <- get_map("Tashkent", zoom = 11, maptype = "satellite", source = "google")
map2 <- get_map("Tashkent", zoom = 11, maptype = "roadmap", source = "google")
map3 <- get_map("Tashkent", zoom = 11, maptype = "terrain", source = "google")
map4 <- get_map("Tashkent", zoom = 11, maptype = "hybrid", source = "google")

plot1 <- ggmap(map1)
plot2 <- ggmap(map2)
plot3 <- ggmap(map3)
plot4 <- ggmap(map4)

grid.arrange(plot1, plot2, plot3, plot4, ncol= 2, nrow = 2)