ggmap를 이용한 지도 그리기 : 값의 크기를 반영

install.packages("ggmap")

install.packages("ggplot2")
library(ggmap)
library(ggplot2)

# R의 기본 기능에서 제공하는 quakes 데이터의 처음 100개를 사용
quakes.DF100 <- quakes[1:100, ]

# 지도의 중심 위치 구하기
map.center <- c(mean(quakes.DF100$long), mean(quakes.DF100$lat))

# 경도를 수정하기
quakes.DF$long <- ifelse(quakes.DF100$long > 180, -(360 - quakes.DF100$long), quakes.DF100$long)

# 지도 설정
quakes.map <- ggmap::get_googlemap(center = map.center, scale = 1, maptye = "satelite", zoom = 5)

# 지진 크기에 맞게 지도 작성하기
ggmap::ggmap(quakes.map, fullpage = TRUE) + geom_point(data = quakes.DF, aes(x = long, y = lat, size = mag), alpha = 0.5)

[참고] 빅데이터 분석의 첫걸음 R로 배우는 코딩, 장용식/강희구 지음, 생능출판, p189