In tpemartin/econDV2:

knitr::opts_chunk$set(echo = FALSE, cache = T, warning = F, message = F, 
  fig.showtext=T)
library(ggplot2)
library(showtext)
sysfonts::font_add_google('Noto Sans TC')
showtext_auto()
theme_set(
  theme(
    text=element_text(family = "Noto Sans TC")
  )+
    theme_classic()
)

source("graph.R")

• fig.showtext = T for chinese characters

graph1

graph1= readRDS("graph1.Rds")
graph1

...

graph2

graph2= readRDS("graph2.Rds")
graph2

graph3

graph3= readRDS("graph3.Rds")
graph3

tpemartin/econDV2 documentation built on Aug. 6, 2023, 11:46 p.m.