[R] how to display prolerly chinese character of sheet name in excel file in xlsx library?

[luofeiyu]

> library("xlsx")
Loading required package: rJava
Loading required package: xlsxjars
> test_template <- loadWorkbook("c:/workspace/test.xls")
> design_tab <- getSheets(test_template)
> design_tab
$`中文`
[1] "Java-Object{org.apache.poi.hssf.usermodel.HSSFSheet at 1560ca4}"

the sheetname which design_tab denote can not be displayed properly ,the
sheet name of c:/workspace/test.xls is a chinese character ,
how can i make the chinese character of sheet name in excel file to be
displayed in xlsx library?