001、

dir()                             ## 直接输出
pdf("001.pdf")
plot(1:10, xlab = "测试")
dev.off()


library(sysfonts)                 ## 给输出的pdf文件增加中文
library(showtext)
font_add("myFont1", "timesbd.ttf")

pdf("002.pdf")
showtext_begin() 
plot(1:10, xlab = "测试")
showtext_end()
dev.off()
dir()

R语言 读入中文名表格 r语言显示中文_R语言 读入中文名表格

 

 

R语言 读入中文名表格 r语言显示中文_R语言 读入中文名表格_02