使用R的xlsx包将公式传递给xls文件

Question

这是我使用的代码.

library(xlsx)
wb <- loadWorkbook('D:/test.xls') 
sheets <- getSheets(wb) 
sheet <- sheets[['my_sheet']]

addDataFrame(x = ds, sheet = sheet, row.names = FALSE, col.names = FALSE, startRow=3, startColumn=1) 

cell.1 <- createCell(rows[1], colIndex=34)[[1,1]]
setCellValue(cell.1, "=A32*B33")
saveWorkbook(wb, 'D:/test.xls')

添加数据帧没有问题.但是当打开xls文件时,我text在单元格A34中看到了"= A32*B33"(需要按下额外的ENTER才能使公式生效).你能帮我正确输入一个公式吗？

Answer 1

我xlsx过去曾使用过软件包,尽管有很大的希望,却发现它缺乏功能和易用性.当我在一分钟前搜索包装手册时,似乎无法做你想做的事情.

好消息是有一种替代形式的包装XLConnect.XLConnect使用相同的Java代码(来自Apache POI项目)xlsx,因此您在操作系统之间仍具有相同的高级别互操作性.

XLConnect有一个功能,可以满足您的需求:setCellFormula().

参考文献:

• 包装手册http://cran.r-project.org/web/packages/XLConnect/XLConnect.pdf

• 此外,我强烈推荐这个优秀的插图:http://cran.r-project.org/web/packages/XLConnect/vignettes/XLConnect.pdf

PS.你能告诉我喜欢这个套餐吗？