[R] 데이터 시각화 - googleVis

 

[R] 데이터 시각화 - ggmap

 

 

위 글에 이어 googleVisd을 이용해 데이터를 시각화하는 내용을 다룹니다.

아래 사이트에 나온 예시들을 실습합니다.

 

 

googleVis examples

 

---

 

googleVis

 

goole에서 제공하는 차트 API이다.

R 인터페이스를 사용하여 데이터 프레임을 기반으로 한  대화형 차트를 제공한다.

(웹 브라우저에서 작동하기 때문에 일부차트의 경우, Flash Player나 최신 브라우저에서만 작동한다.)

 

 

 

 

 

 

라이브러리 설치하기

 

별도의 API 키없이 install.packages로 다운받아 사용할 수 있습니다.

 

 

# 라이브러리 다운
install.packages("googleVis")

# googleVis 라이브러리 적재
library(googleVis)

 

 

 

 

 

 

 

 

 

데이터 프레임 생성

 

다음과 같이 차트로 나타낼 데이터들을 데이터 프레임 형태로 선언합니다.

 

# 데이터 프레임 생성
df=data.frame(country=c("US", "GB", "BR"), 
              val1=c(10,13,14), 
              val2=c(23,12,32))

 

 

 

 

 

 

- Line chart

 

# 꺾은선 그래프
Line <- gvisLineChart(df)
plot(Line)

 

 

 

 

 

 

 

 

-  Line chart with two axis

 

# 두개의 축을 가진 꺾은선 그래프
Line2 <- gvisLineChart(df, "country", c("val1","val2"),
                       options=list(
                         series="[{targetAxisIndex: 0},
                                 {targetAxisIndex:1}]",
                         vAxes="[{title:'val1'}, {title:'val2'}]"
                       ))
plot(Line2)

 

 

 

 

 

 

 

- Bar chart

 

# 막대 그래프 (수평)
Bar <- gvisBarChart(df)
plot(Bar)

 

 

 

 

 

 

 

- Column chart

 

# 막대 그래프 (수직)
Column <- gvisColumnChart(df)
plot(Column)

 

 

 

 

 

 

 

 

- Area chart

 

# 영역 그래프
Area <- gvisAreaChart(df)
plot(Area)

 

 

 

 

 

 

 

 

- Stepped Area chart

 

# 계단 영역 그래프
SteppedArea <- gvisSteppedAreaChart(df, xvar="country", 
                                    yvar=c("val1", "val2"),
                                    options=list(isStacked=TRUE))
plot(SteppedArea)

 

 

 

 

 

 

 

- Combo chart

 

# 콤보차트(이중차트)
Combo <- gvisComboChart(df, xvar="country",
                        yvar=c("val1", "val2"),
                        options=list(seriesType="bars",
                                     series='{1: {type:"line"}}'))
plot(Combo)

 

 

 

 

 

 

 

 

- Scatter chart

 

# 산점도
Scatter <- gvisScatterChart(women, 
                            options=list(
                              legend="none",
                              lineWidth=2, pointSize=0,
                              title="Women", vAxis="{title:'weight (lbs)'}",
                              hAxis="{title:'height (in)'}", 
                              width=300, height=300))
plot(Scatter)

 

 

 

 

 

 

 

 

- Bubble chart

 

# 버블차트
Bubble <- gvisBubbleChart(Fruits, idvar="Fruit", 
                          xvar="Sales", yvar="Expenses",
                          colorvar="Year", sizevar="Profit",
                          options=list(
                            hAxis='{minValue:75, maxValue:125}'))
plot(Bubble)

 

 

 

 

 

 

 

 

- Customizing Lines

# 커스텀 선그래프
Dashed <-  gvisLineChart(df, xvar="country", yvar=c("val1","val2"),
                         options=list(
                           series="[{color:'green', targetAxisIndex: 0, 
                          lineWidth: 1, lineDashStyle: [2, 2, 20, 2, 20, 2]}, 
                          {color: 'blue',targetAxisIndex: 1, 
                          lineWidth: 2, lineDashStyle: [4, 1]}]",
                           vAxes="[{title:'val1'}, {title:'val2'}]"
                         ))
plot(Dashed)

 

 

 

 

이외에도 googleVis에서는 다양한 차트를 지원하고 있다.

 

 

 

 

감사합니다.

 

 

---

 

 

 

2022년 AI분석을 위한 R통계교육의 수업내용을 정리한 글입니다.

 

공부한 내용을 복습/기록하기 위해 작성한 글이므로 내용에 오류가 있을 수 있습니다.