ggmapで震源表示

最近の１週間に起こったマグニチュード２.５以上の地震のうち、
日本周辺の震源の深さとマグニチュードをグーグルマップにプロットする。

library(ggmap)

## Loading required package: ggplot2

(map = ggmap(get_googlemap(center = c(137.5, 35.5), zoom = 5)) + 
    geom_point(data = read.csv("http://earthquake.usgs.gov/earthquakes/catalogs/eqs7day-M2.5.txt"), 
        aes(Lon, Lat, size = Magnitude, colour = Depth)))

## Warning message: Removed 173 rows containing missing values (geom_point).