我基于 csv 文件创建了一个 flextable,我在上面添加了一些样式,更改了一些单元格。然后我想在将它添加到文档之前删除这个 flextable 的特定列。有没有办法创建 flextable 的副本并指定 col_keys?
mydf <- GetData(....)
cols <- names(mydf)
myft <- flextable(mydf, col_keys = cols)
# Adding style to ft...
# ....
# Here I want to remove one column to the ft (and only here, not when first creating the ft)
# something as:
# ft <- CreateCopyOfFlextable(ft,cols[-which(cols=='COLB')])
#
my_doc <- read_docx()
my_doc <- my_doc %>% body_add_par("") %>%
body_add_flextable(value = ft)
print(my_doc, target = 'c:/temp/doc.docx')
Run Code Online (Sandbox Code Playgroud) 有没有办法改变弹性表中的值?在版本 0.4.7.003 中可以这样做(这在 0.5.1 中不再有效):
library(flextable)
ft <- flextable( head( iris ))
ft$body$dataset[2,5] <- 'XXXXXXXX'
ft
Run Code Online (Sandbox Code Playgroud)