How to overlay two ggplots: one is a cluster plot and the other is a basemap?

Question

I have some burglary data from San Francisco which I easily visualized as follows:

library(ggmap)
library(ggplot2)
library(factoextra)

qmplot(X,Y, data=burgl