5. ggplot2 pratical use

외형 변경은 사용자들이 빨리 해당 정보를 파악하도록 바꾸는 것을 의미한다.

5.1 테마 시스템

R 기본 테마 시스템은 데이터와 데이터가 아닌 것을 구분하지 않지만, ggolot2의 테마 시스템은 두가지를 분리해 적용한다.
테마를 사용하는 대표적인 방식
- ggplot2에서 기본으로 제공하는 테마 사용
- 테마 속성을 직접 설정해 사용
- ggthemes에 포함된 다양한 테마 사용

첫번째 방법을 사용해보자

library(ggplot2)
ggplot(iris, aes(Sepal.Length, Sepal.Width)) + geom_point() + theme_classic()  # 바로 전에 쓰던 테마

plot of chunk unnamed-chunk-1

ggplot(iris, aes(Sepal.Length, Sepal.Width)) + geom_point() + theme_bw()  # 격자가 그려진 테마?

plot of chunk unnamed-chunk-1

ggplot(iris, aes(Sepal.Length, Sepal.Width)) + geom_point() + theme_gray()  # 회색 바탕이 있는 테마

plot of chunk unnamed-chunk-1

theme_classic()
theme_bw()
tehme_gray()
이 세 가지 기본 테마에 대한 그래프 차이를 알 수 있다.

old <- theme_set(theme_classic())
g <- ggplot(iris, aes(Sepal.Length, Sepal.Width)) + geom_point()
g

plot of chunk unnamed-chunk-2

theme_bw()와 같이 해당 그래프에만 적용하는 방법이 아닌, theme_set(theme_classic())을 old객체에 저장해 직접 모든 그래프에 테마를 적용하는 방법이 있다.
old <- theme_set(theme_classic())명령어는 앞으로 그려지는 모든 ggplot2 그래프의 테마시스템이 'theme_classic()'으로 바뀌게 된다.
old객체에는 바뀌기 전의 테마 객체가 저장된다.

g + old

plot of chunk unnamed-chunk-3

old에 저장된 테마를 재사용 할 수 있음을 알 수 있다.

두번째 방식인 테마 속성 직접 지정 방법을 살펴보자.

<그림>

다음은 element_text를 사용한 몇가지 설정에 따른 차이를 보여준다.

여기서는 plot.title객체를 이용하여 플로팅 제목을 설정한다.

# 이전 테마로 전체 테마 복원
theme_set(old)
d <- ggplot(iris, aes(Sepal.Length, Sepal.Width)) + geom_point() + ggtitle("그래프 제목")

기본 플롯이다.

(g1 <- d + theme(plot.title = element_text(size = 15)))

## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ea>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b7>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b8>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9e>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <98>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ed>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <94>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <84>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ec>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a0>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9c>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <aa>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a9>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ea>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b7>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b8>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9e>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <98>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ed>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <94>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <84>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ec>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a0>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9c>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <aa>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a9>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ea>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b7>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b8>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9e>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <98>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ed>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <94>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <84>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ec>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a0>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9c>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <aa>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a9>

plot of chunk unnamed-chunk-5

플로팅 제목을 15point로 키운다.

(g2 <- d + theme(plot.title = element_text(size = 15, angle = 180)))

## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ea>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b7>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b8>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9e>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <98>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ed>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <94>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <84>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ec>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a0>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9c>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <aa>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a9>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ea>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b7>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b8>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9e>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <98>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ed>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <94>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <84>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ec>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a0>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9c>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <aa>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a9>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ea>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b7>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b8>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9e>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <98>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ed>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <94>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <84>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ec>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a0>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9c>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <aa>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a9>

plot of chunk unnamed-chunk-6

플로팅 제목을 180도 회전 시킨다.

(g3 <- d + theme(plot.title = element_text(size = 15, color = "red")))

## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ea>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b7>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b8>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9e>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <98>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ed>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <94>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <84>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ec>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a0>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9c>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <aa>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a9>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ea>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b7>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b8>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9e>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <98>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ed>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <94>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <84>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ec>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a0>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9c>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <aa>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a9>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ea>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b7>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b8>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9e>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <98>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ed>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <94>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <84>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ec>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a0>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9c>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <aa>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a9>

plot of chunk unnamed-chunk-7

플로팅 제목의 색상을 “red"로 변경한다.

(g4 <- d + theme(plot.title = element_text(size = 15, hjust = 0)))

## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ea>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b7>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b8>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9e>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <98>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ed>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <94>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <84>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ec>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a0>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9c>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <aa>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a9>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ea>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b7>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b8>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9e>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <98>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ed>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <94>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <84>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ec>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a0>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9c>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <aa>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a9>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ea>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b7>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b8>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9e>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <98>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ed>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <94>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <84>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ec>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a0>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9c>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <aa>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a9>

plot of chunk unnamed-chunk-8

제목의 가로위치를 지정한다. 0.1이면 1cm정도 되는 것 같다…

(g5 <- d + theme(plot.title = element_text(size = 15, face = "italic")))

## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ea>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b7>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b8>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9e>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <98>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ed>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <94>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <84>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ec>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a0>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9c>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <aa>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a9>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ea>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b7>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b8>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9e>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <98>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ed>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <94>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <84>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ec>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a0>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9c>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <aa>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a9>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ea>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b7>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b8>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9e>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <98>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ed>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <94>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <84>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ec>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a0>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9c>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <aa>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a9>

plot of chunk unnamed-chunk-9

face는 폰트를 설정하는 설정이다.

(g6 <- d + theme(plot.title = element_text(size = 15, vjust = 0)))

## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ea>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b7>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b8>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9e>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <98>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ed>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <94>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <84>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ec>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a0>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9c>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <aa>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a9>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ea>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b7>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b8>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9e>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <98>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ed>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <94>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <84>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ec>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a0>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9c>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <aa>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a9>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ea>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b7>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b8>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9e>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <98>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ed>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <94>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <84>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ec>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a0>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9c>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <aa>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a9>

plot of chunk unnamed-chunk-10

제목의 세로위치를 지정한다.

element_line은 라인을 설정하는 속성이다.

panel.grid.major를 사용하여 주(major) 그리드(격자) 라인을 설정한다.

d <- ggplot(iris, aes(Sepal.Length, Sepal.Width)) + geom_point() + ggtitle("그래프 제목")
# 기본 플롯에는 그리드가 없다.

(g1 <- d + theme(panel.grid.major = element_line(colour = "blue")))

## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ea>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b7>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b8>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9e>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <98>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ed>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <94>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <84>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ec>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a0>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9c>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <aa>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a9>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ea>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b7>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b8>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9e>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <98>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ed>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <94>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <84>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ec>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a0>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9c>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <aa>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a9>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ea>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b7>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b8>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9e>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <98>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ed>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <94>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <84>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ec>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a0>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9c>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <aa>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a9>

plot of chunk unnamed-chunk-11

파란색으로 변경한다.

(g2 <- d + theme(panel.grid.major = element_line(size = 2)))

## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ea>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b7>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b8>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9e>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <98>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ed>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <94>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <84>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ec>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a0>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9c>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <aa>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a9>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ea>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b7>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b8>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9e>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <98>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ed>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <94>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <84>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ec>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a0>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9c>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <aa>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a9>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ea>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b7>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b8>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9e>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <98>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ed>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <94>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <84>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ec>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a0>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9c>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <aa>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a9>

plot of chunk unnamed-chunk-12

두께를 2point로 설정한다.

(g3 <- d + theme(panel.grid.major = element_line(linetype = "dotdash")))

## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ea>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b7>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b8>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9e>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <98>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ed>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <94>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <84>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ec>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a0>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9c>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <aa>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a9>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ea>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b7>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b8>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9e>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <98>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ed>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <94>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <84>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ec>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a0>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9c>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <aa>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a9>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ea>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b7>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b8>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9e>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <98>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ed>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <94>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <84>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ec>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a0>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9c>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <aa>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a9>

plot of chunk unnamed-chunk-13

격자선을 점선(dotdash)로 바꾼다.

axis.line으로 축 라인을 설정한다.

(g4 <- d + theme(axis.line = element_line(linetype = "dotdash")))

## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ea>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b7>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b8>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9e>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <98>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ed>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <94>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <84>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ec>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a0>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9c>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <aa>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a9>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ea>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b7>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b8>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9e>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <98>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ed>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <94>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <84>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ec>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a0>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9c>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <aa>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a9>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ea>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b7>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b8>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9e>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <98>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ed>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <94>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <84>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ec>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a0>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9c>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <aa>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a9>

plot of chunk unnamed-chunk-14

x,y축 라인을 점선으로 변경한다.

(g5 <- d + theme(axis.line = element_line(colour = "red")))

## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ea>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b7>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b8>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9e>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <98>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ed>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <94>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <84>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ec>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a0>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9c>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <aa>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a9>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ea>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b7>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b8>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9e>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <98>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ed>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <94>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <84>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ec>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a0>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9c>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <aa>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a9>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ea>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b7>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b8>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9e>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <98>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ed>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <94>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <84>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ec>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a0>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9c>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <aa>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a9>

plot of chunk unnamed-chunk-15

빨간색으로 변경한다.

(g6 <- d + theme(axis.line = element_line(lineend = "round", size = 2)))

## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ea>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b7>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b8>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9e>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <98>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ed>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <94>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <84>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ec>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a0>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9c>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <aa>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a9>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ea>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b7>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b8>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9e>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <98>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ed>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <94>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <84>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ec>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a0>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9c>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <aa>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a9>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ea>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b7>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <b8>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9e>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <98>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ed>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <94>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <84>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <ec>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a0>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <9c>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <eb>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <aa>
## Warning: conversion failure on '洹몃옒攼㹤봽 攼㹣젣紐愼㸹' in 'mbcsToSbcs': dot substituted for <a9>

plot of chunk unnamed-chunk-16

라인끝을 둥글게 하고 크기를 2point로 한다.