更改 flextable 中的单元格值

change a cell value in a flextable

有没有一种方法可以更改 flextable 中的值?在版本 0.4.7.003 中可以这样做(这在 0.5.1 中不再起作用):

library(flextable)
ft <- flextable( head( iris ))
ft$body$dataset[2,5] <- 'XXXXXXXX'
ft

您可以使用函数 flextable::compose:

library(flextable)
ft <- flextable( head( iris ))
ft <- compose(ft, i = 2, j = 5, as_paragraph(as_chunk('XXXXXXXX')))
ft