Rstudio Cloud의 그래프에서 한글폰트의 출력

Rstudio Cloud에서 한글 글꼴 설치

Rstudio Cloud는 리눅스 기반의 R을 제공하지만 사용자에게 관리자 권한을 제공하지 않기 때문에 root 디렉토리에 글꼴을 설치할 수 없습니다. 그래서 home 디렉토리에 .fonts 폴더를 생성한 후, 그곳에 글꼴을 설치하고 R에서 인식할 수 있도록 해줘야 합니다.

먼저 Rstudio의 콘솔창 옆에 터미널 창을 실행시킵니다. 평소 git에 푸시할 때 빼고는 Rstudio에서 터미널을 이용하는 경우는 거의 없는데 여기서 사용하니 신기합니다.

터미널 창에 다음의 코드를 실행시켜 .fonts 디렉토리를 만들고 나눔글꼴을 설치합니다.

$ mkdir ~/.fonts  # '~/.fonts' 디렉토리 생성
$ cd ~/.fonts     # '~/.fonts' 디렉토리 이동
$ wget http://cdn.naver.com/naver/NanumFont/fontfiles/NanumFont_TTF_ALL.zip
  # 나눔글꼴(zip파일) 내려받기
$ unzip NanumFont_TTF_ALL.zip -d NanumFont  # zip파일 해제
$ rm -f NanumFont_TTF_ALL.zip  # 내려받은 zip파일 제거

여기까지 Rstudio Cloud에서 한글 글꼴을 설치하는 작업은 끝났습니다. 이제 R에 글꼴이 설치된 경로를 등록하여 R이 글꼴을 인식할 수 있도록 해야 합니다. 앞에서는 터미널에서 작업했지만 이젠 우리가 자주 사용하는 콘솔창으로 이동하여 다음의 코드를 실행시킵니다.

# install.packages("sysfonts")
library(sysfonts)
font_add("NanumGothicBold", "~/.fonts/NanumFont/NanumGothicBold.ttf")
font_add("NanumGothic", "~/.fonts/NanumFont/NanumGothic.ttf")

저는 앞으로 고딕체만 쓸 예정이므로 NanumGothicBold, NanumGothic 폰트만 추가했습니다.

이제 마무리 되었습니다. 그러나 여기까지 작업만으로는 Rstudio Cloud의 그래프에서 한글글꼴이 제대로 출력되지 않습니다. 한국 R스터디 그룹에서는 rmd chunk에 fig.showtext 옵션을 추가하는 방법, 그래프를 html로 렌더링한 결과를 보여주는 방법, svgPanZoom과 svglite 패키지를 이용하여 기본 plot pane으로 보내는 방법 세가지 방안을 제안²하고 있습니다.

한글 글꼴 출력 방법

# install.packages("showtext")
library(showtext)
showtext_auto()
plot(1:10, main="이것은 테스트입니다.", xlab = "X축", ylab = "Y축")

# install.packages("ggplot2")
# install.packages("plotly")
library(ggplot2)
library(plotly)

ggplot(mtcars, aes(x=wt, y=mpg)) +
  geom_point() + geom_smooth() +
  ggtitle("이것은 테스트입니다.")

library(dplyr)
{ggplot(mtcars, aes(x=wt, y=mpg)) +
  geom_point() + geom_smooth() +
  ggtitle("이것은 테스트입니다.")} %>% ggplotly()

# install.packages("svgPanZoom")
# install.packages("svglite")

library(svgPanZoom)
library(svglite)

showtext_auto()
svgPanZoom(
  svglite:::inlineSVG(
   plot(1:10, main="이것은 테스트입니다.", xlab = "X축", ylab = "Y축") 
  )
)