超简单, 一行代码解决, 但是记住, 如下代码
par(family='STKaiti') # 改字体, 否则不显示中文#下方代码是示例 barplot(1:5) table(pol$region) barplot(table(pol$region),col='wheat',main = '乡村数')
