使用XLConnect或xlsx将文本添加到数据格式

Question

我是R的新手，正在尝试创建一个显示重量的报告。我目前正在使用XLConnect，但我愿意使用xlsx。我需要在输入数据后显示“kgs”。我目前有：

require(XLConnect)

testwb = loadWorkbook("test.xlsx", create=T)

createSheet(testwb,"Data")

inputs <- c(12,15,17)

writeWorksheet(testwb,inputs,"Data", startRow = 1, startCol = 1, header = F)

weightFormat <- createCellStyle(testwb)

setDataFormat(weightFormat, format = "#,##0 ' kgs' ")

setCellStyle(testwb,sheet="Data", row = 1:3, col = 1, cellstyle = weightFormat)

saveWorkbook(testwb)

这显然不起作用，因为在excel中没有读取“kgs”。关于如何在不破坏文件的情况下显示“kgs”的任何建议都将非常感激