[플레이데이터 빅데이터 부트캠프]R 프로그래밍 - 응용

시각화

워킹 디렉토리 지정

setwd("C:/Users/Playdata/Desktop/Playdata")
getwd()

 

시각화에 필요한 패키지 설치

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

 

데이터 불러오기

data <- read.csv("wifi.csv", header=T, fileEncoding="euc-kr")
head(data)

 

필요한 열만 정제하기 위해 1,4,5 열만 뽑은 다음 data2 변수에 넣고 head로 확인해본다.

data2 <- data[,c(1,4,5)]
names(data2) <- c("name", "lon", "lat")
head(data2)
    name      lon      lat
1 강남구 127.0718 37.49558
2 강남구 127.0381 37.49761
3 강남구 127.0410 37.50840
4 강남구 127.0642 37.49394
5 강남구 127.0475 37.51731
6 강남구 127.0471 37.48339

 

데이터가 포함된 지도를 빠르게 그릴 수 있는 qmplot 함수를 이용하여 시각화한다.

qmplot(lon, lat, data = data3, maptype = "toner-lite", color =I("red"))

그림과 같이 동작구에 WIFI가 설치되어 있는 곳을 확인할 수 있다.