R Visualization - [dotchart]

Dotchart

범주형 변수와 숫자형 변수와의 관계를 확인하고 싶을 때 사용

그림 1

dotchart(mtcars$mpg, labels=row.names(mtcars),cex=.7,
        main="Gas Milage for Car models",
        xlab='Miles Per Gallon')

아래와 같이 그룹별로 dotchart를 그리고 정렬할 수 있다.

그림 2

 

#그룹별 docchart
x <- mtcars[order(mtcars$mpg), ]
x$cyl <- factor(x$cyl)
x$color[x$cyl==4] <- "red"
x$color[x$cyl==6] <- "blue"
x$color[x$cyl==8] <- "darkgreen" 

dotchart(x$mpg, labels= row.names(mtcars),groups = x$cyl,
        main='Gas Milage for Car Model\ngruped by Cylinder',
        xlab='Miles Per Gallon', gcolor='blue', color=x$color)

 

그림 3

#month 정의
month <- matrix(1:12, ncol=3) #ncol : number of col
rownames(month) <-  paste('row', 1:4)
colnames(month) <- paste('col',1:3)

#month.abb로 ylabel 설정
dotchart(as.vector(month), label= month.abb)
title(main='x is a vector')

그림 4

dotchart(month)
title(main='x is a matrix')

그림 5

#분기 지정
quarter.name <- c("1QT", "2QT", "3QT", "4QT")
quarter <- factor(row(month), label = quarter.name)

names <- c('1st','2nd','3rd')
dotchart(month , groups= quarter, labels= names)
title(main='groups = quater, labels= name')

아래와 같이 분기별 기술통계량도 확인할 수 있다.

그림 6

#show mean data each quarter
dotchart(month, group=quarter, labels=month.abb, gdata = gmean) 
title(main='show mean_data each quarter')

Options

dotchart에 다양한 옵션을 추가할 수 있다.

e.g.

- pch : 값 표현 변경

- gpch : gdata pch 변경

- cex : 사이즈 수정 (e.g. cex=1.1) 

그림 7

#color: color rows
#bg : dot's color
#gcolor, : quarter's color
#lcolor : line color

dotchart(month, cex = 1.2 , bg='skyblue', color='red', lcolor='blue')

t() 를 쓰면 전치된다.

위 시각화로 예를들면 (Y축)

Col 1

    row3

    row2

    row1

​

t(month) 하면

​

row3

    Col1

    Col2

    Col3