-Data 시각화 공부와 정리




[결과물]


[사용 데이터 예시]





[사용 코드]


library(ggmap)

## ggmap이 버전이슈가 최근에 있어서 오류가 날지도 모른다.

## 그런 경우 install.packages("ggmap", type = "source") 를 통해 다시 설치하면 해결.

library(ggplot2)


a <- read.csv(file = "rarara.csv", sep = "," , header = TRUE)

## 파일을 불러오기


sub_a <- subset(a, rain > 50, select = c("longti","latti","rain"))

## 위도와 경도만 가져와서 subset을 만듭니다.

str(sub_a)


cent <- c(lon = 127.8, lat = 35.8)

## 한국(남한)기준 위도 경도의 중심입니다.


map <- ggmap(get_googlemap(center = cent, zoom = 7, maptype='roadmap', color = 'bw'), extent = 'device')

## map 변수에 구글 지도(남한) 부분을 저장합니다.

map + geom_point(data=sub_a, aes(x=longti, y=latti),colour ='gray10', alpha = 1) ## 점을 찍어주는 라인




[레퍼런스]

전국댐위치.xlsx



::비주얼라이즈님의 블로그

http://visualize.tistory.com/111


::Lovetoken님의 블로그

https://lovetoken.github.io/r/data_visualization/2016/10/18/ggmap.html

반응형
Posted by JoeSung
,