将R中的huxtable保存到LaTex格式的文件中

install.packages("huxtable")
install.packages("kableExtra")

library(huxtable)

# 创建一个huxtable对象
my_table <- huxtable(
  data = iris[1:5, 1:3],
  add_colnames = TRUE,
  add_rownames = TRUE
)

# 对表格进行编辑和格式化
my_table <- set_all_borders(my_table, 1)
my_table <- set_font_size(my_table, 10)

library(kableExtra)

# 将huxtable对象转换为LaTex格式的表格
latex_table <- kable(my_table, format = "latex")

# 将LaTex格式的表格保存到文件中
writeLines(latex_table, "table.tex")