R 给定一个没有标题的弹性表，如何添加标题

library(flextable) # version 0.9.2

flexiris_with_head <- flextable(iris)
flexiris_with_head

flexiris_without_head <- flexiris_with_head %>%
  delete_part(part = "header")
flexiris_without_head

library(dplyr)
library(flextable)

# flextable
df <- flextable(head(iris))

# iris without header -> df
df_without_header <- df %>%
  delete_part(part = "header")

# adding header to flextable
df_with_header <- df_without_header %>%
  add_header_row(
    values = colnames(iris), 
    top = TRUE
  ) %>%
  hline_top(part = "header") %>%
  hline_bottom(part = "header")

df_with_header

R相关问答推荐

显示矩阵的上半部分或下半部分时正确放置重要相关性

R dðr按时间间隔进行总结

如何判断R中一列的值是否在所有其他列中重复？

将模拟变量乘以多个观测结果中的模拟变量

警告：lmdif：info = 0. nls. lm()函数的输入参数不正确

为什么观察不会被无功值变化触发？

如何同时从多个列表中获取名字？

在使用bslb和bootstrap5时，有没有办法更改特定dt行的 colored颜色 ？

根据现有列的名称和字符串的存在进行变异以创建多个新列

Ggplot2中geom_tile的动态zoom

如何创建累加到现有列累计和的新列？

如果COLSUM为>；0，则COLNAME为向量

远离理论值的伽马密度曲线下面积的近似

在R中，如何从一系列具有索引名的变量快速创建数据帧？

解析嵌套程度极高的地理数据

将多个列合并为一个列的有效方法是什么？

在ggplot2上从多个数据框创建复杂的自定义图形

将文本批注减少到gglot的y轴上的单个值

当由base：：限定时，`[.factor`引发NextMethod错误

如何使用grepl()在数据帧列表中 Select 特定字符串？