the corresponding R script:
setwd('C:/Users/Lenovo/Desktop')
require( "Nozzle.R1" );
#分析方法
r <- newCustomReport( "My Report" );
s1<- newSection('分析方法')
#########
r<- addTo(r,s1)
writeReport(r,filename = 'reports/my_report',credits = FALSE)
neither html nor browser can correctly show Chinese charater.

my_report.html.txt
the corresponding R script:
setwd('C:/Users/Lenovo/Desktop')
require( "Nozzle.R1" );
#分析方法
r <- newCustomReport( "My Report" );
s1<- newSection('分析方法')
#########

r<- addTo(r,s1)
writeReport(r,filename = 'reports/my_report',credits = FALSE)
neither html nor browser can correctly show Chinese charater.
my_report.html.txt