ggplot() 함수 : 그래프를 표현하는 좌표를 그리기 위한 판을 짜는 함수
ggplot(데이터 세트, aes(데이터속성))
ggplot() 함수 뒤에 + geom_point() 만 추가로 입력
ggplot() 함수 뒤에 + geom_line() 만 추가로 입력
누적 막대 그래프에 coord_polar() 함수 추가하면 선버스트 차트로 변환가능
선버스트 차트 : 계층 구조의 데이터를 수준별로 비율을 표시하는 그래프
coord_polor() 함수에 theta = 'y' 옵션 추가
ggplot() 함수 뒤에 + geom_histogram() 함수 추가
기본숙제
선 그래프 선은 빨간색으로, 점 크기는 3으로 키워서 그래프 그리기
==> 절편과 기울기는 **회귀분석** (regression analysis)으로 구할 수 있음
그래프에 사선 추가하면, 그래프 추세 확인 가능
geom_abline(intercept = 절편, slope = 기울기)
평행선을 그래프에 추가하면, 평행선을 기준으로 그래프 변동 추이를 좀 더 명확하게 파악 가능
geom_hline(yintercept = y절편)
yintercept 옵션에 y축 절편 값을 입력하면 그 값에 따라 평행선 그림
수직선은 그래프의 특정 위치 나타냄
geom_hline() 함수와 반대로 옵션에 x축 절편 입력
geom_vline(xintercept = x절편)
geom_vline(xintercept = as.Date('2005-07-01'))
Geom_text(aes(label = 레이블, vjust = 세로 위치, hjust = 가로 위치)
annotate('모양', xmin = x축 시작, xmax = x축 끝, ymin = y축 시작, ymax = y축 끝)
labs(x = 'x축명', y = 'y축명', title = '그래프 제목')
register_google(key = '사용자 API 키)
get_googlemap(center, maptype = '지도유형')
--> 지도유형 : terrain(지형/기본값), satellite(인공위성), roadmap(로드맵), hybrid(인공위성+로드맵)
#예시
get_googlemap(c(lon = 127, lat = 37,6), maptype = 'roadmap')
#예시
get_googlemap('seoul', maptype = 'roadmap')
install.packages('ggmap')
library(ggmap)
register_google(key = '사용자 API 키를 입력하세요.')
gg_seoul <- get_googlemap('seoul', maptype = 'roadmap')
ggmap(gg_seoul)
library(dplyr)
library(ggplot2)
geo_code <- enc2utf8('대전역') %>% geocode()
deo_Data <- as.numeric(geo_code)
zoom 옵션 : 지도 확대하거나 축소하는 옵션
get_googlemap(center = geo_data, maptype = 'roadmap',
zoom = 13) %>% ggmap() +
geom_point(data = geo_code, aes(x = geo_code$lon, y = geo_cpde$lat))
zoom = 9
zoom = 17
선 그래프 선은 빨간색으로, 점 크기는 3으로 키워서 그래프 그리기
안양시
범계역