Нам нужно использовать writeFormula
, см. Пример:
library(openxlsx)
wb <- createWorkbook()
addWorksheet(wb = wb, sheetName = "Sheet1")
addWorksheet(wb = wb, sheetName = "Sheet2")
# add some data on Sheet2, so we can get some value using formula in Sheet1
writeData(wb = wb, sheet = "Sheet2", x = mtcars)
writeFormula(wb, sheet = "Sheet1", x = "=Sheet2!B2",
startCol = 1, startRow = 1)
# test: view file without saving:
openXL(wb)