R 合并flextables并保留格式的方法

R 合并flextables并保留格式的方法,r,flextable,R,Flextable,假设我有两个FlexTable: ft1 <- regulartable(head(iris)) ft2 <- regulartable(tail(iris)) ft1不是很优雅,但可能会完成任务 库(flextable) 图书馆(magrittr) ft1将整个东西涂成绿色,并使所有文本变为蓝色。我希望保持原来表格的格式,也就是说,只有前6行是绿色的,下6行是蓝色的。抱歉,如果我是不干净的,这将完成这个例子的技巧,我希望有一些更通用的东西,因为我的实际表有大量的格式。也许没有办法

假设我有两个FlexTable:

ft1 <- regulartable(head(iris))
ft2 <- regulartable(tail(iris))

ft1不是很优雅,但可能会完成任务

库(flextable)
图书馆(magrittr)

ft1将整个东西涂成绿色,并使所有文本变为蓝色。我希望保持原来表格的格式,也就是说,只有前6行是绿色的,下6行是蓝色的。抱歉,如果我是不干净的,这将完成这个例子的技巧,我希望有一些更通用的东西,因为我的实际表有大量的格式。也许没有办法让它更通用:(@RAB:我想通过一些努力是可能的。flextable对象中包含所有格式信息,因此应该可以提取它,然后根据源flextable在每个单元格的基础上应用格式来组装一个新的flextable对象…但是包开发人员可能更适合此任务…它可以将需要一个特定的开发来实现这一点。我将在下一次开发运行中尝试实现这一点。要实现这一点,您不仅需要合并x$body$dataset,还需要合并存储在其他化合物中的所有格式/span-。很酷,希望它很快就能成为一项功能。感谢您总是如此快速地响应:)@DavidGohel只是想知道这在目前是可能的吗?thanks@user63230不,对不起
ft1 <- bg(ft1, bg="green")
ft2 <- color(ft2, color = "blue")
ft3 <- regulartable(rbind(ft1$body$dataset, ft2$body$dataset))