Rmd无法运行出表格

应该运行出一个表格，但是却出现了乱码，但是html里面是有正常结果的，请问这是怎么回事啊？

卸载重装kableExtra，1.3.4版本可正常运行出结果。安装过程中会一起安装systemfonts包。代码：

library(kableExtra)
data.pdf<-data.frame(x=0:4,probablility=c(0.1,0.2,0.2,0.2,0.3))
a<-kbl(data.pdf,align='lr')%>%
kable_classic('hover',full_width=F,position='center')
print(a)

运行结果：