remove.packages("Rttf2pt1")   
remotes::install_version("Rttf2pt1", version = "1.3.8") 


install.packages("extrafont")
library(extrafont)
font_import(paths="C:\\R\\Font", pattern = "NanumGothic", prompt = FALSE)
loadfonts(device="win")