'Lattice' 시스템에 대해 자세히 알아보자 - 그래픽 예시 (출처: R내 swirl package)

#

# swirl()내 탐색적 데이터 분석(Exploratory Data Course)를 실행해보자.

# 

# 

 

library("swirl")

swirl()

 

Exploratory Graphs 과정에서 6번 플로팅 시스템(6. Lattice Plotting System)을 선택한다.

탐색적 분석 과정의 여섰번째 섹션: 'Lattice' 시스템 - 그래픽 예시(요약)
- ggplot2내의 diamonds 데이터를 통해 xyplot 그래프 표현 예시를 살펴본다.    

 

---

• 그래픽 예시

ggplot2에 담긴 diamonds 데이터를 통해 Lattice 그래프를 확인해보자.

 

> str(diamonds) # diamonds 데이터의 구성을 살펴보자

 

> table(diamonds$color) # diamonds 데이터의 칼라를 살펴보자

총 7개의 칼라가 존재하는 걸 알 수 있다.

 

 

> table(diamonds$color, diamonds$cut) # 다이아몬드 색상과 커팅별로 살펴보자.

가장 흔한 값은 아이딜 커팅에, G칼라이다.

 

 

> myedit("myLabels.R") #swirl에서 세팅한 값을 확인해보자.

myxlab <- "Carat"
myylab <- "Price"
mymain <- "Diamonds are Sparkly!"

 

 

> source(pathtofile("myLabels.R"), local=TRUE) # 해당 값을 실행해보자. 위 3가지 변수가 R에 생성된다.

 

 

> xyplot(price ~ carat | color*cut, data=diamonds, strip = FALSE, pch=20, xlab = myxlab, ylab = myylab, main = mymain) # 다이아몬드 색상 및 커팅별로 캐롯이 가격에 대한 그래프를 그려보자. 총 35개를 보여준다(7 x 5). 

 

 

> xyplot(price ~ carat | color*cut, data=diamonds, pch=20, xlab = myxlab, ylab = myylab, main = mymain) # strip레벨 제외하고, 그래프를 표현해보자.

strip을  레벨 표현 여부를 결정한다.