댓글 쓰기 권한이 없습니다. 로그인 하시겠습니까?
사이트 로그인
오늘도 계속 ggmap에 대해 다루도록 할게요.
바로 이전 포스팅에서는 간단하게 ggmap을 통해 지도를 그리고
로그의 위도 경도 데이터를 통해 지도에 점을 찍는 법 까지 다루었 습니다.
오늘은 지도에 찍힌 점의 분포를 한눈에 알 수 있도록 등고선(?) 비슷한 것을 그려보도록 하겠습니다.
데이터는 이전에 썼던 데이터를 그대로 쓰도록 하죠 : )
gc <- geocode('Seoul') center <- as.numeric(gc) ggmap(get_googlemap(center=center, scale = 1,maptype = "roadmap",zoom=7), fullpage = TRUE)+ geom_point(aes(x = longitude, y = latitude, colour = "red" , size= 10), data = df3) + stat_density2d(aes(x = longitude, y = latitude, fill = ..level.., alpha = ..level..), size =6, bins = 10, data = df3, geom = 'polygon') |
geom_point 까지가 이전 포스팅에서 다뤘던 함수 였죠?
geom_point로 점을 찍고 + 로 stat_density2d 함수를 연결해 주시면 됩니다.
fill 과 alpha 는 level로 설정 해주거나 아예 안 넣어 주실수 있는데, 안넣어주시면
아래와 같이 plot이 형성 됩니다.
gc <- geocode('Seoul') center <- as.numeric(gc) ggmap(get_googlemap(center=center, scale = 1,maptype = "roadmap",zoom=7), fullpage = TRUE)+ geom_point(aes(x = longitude, y = latitude, colour = "red" , size= 10), data = df3) + stat_density2d(aes(x = longitude, y = latitude, fill = ..level.., alpha = ..level..), size =6, bins = 10, data = df3, geom = 'polygon')+ facet_wrap(~ country_code) |
Designed by sketchbooks.co.kr / sketchbook5 board skin
Sketchbook5, 스케치북5
Sketchbook5, 스케치북5
Sketchbook5, 스케치북5
Sketchbook5, 스케치북5