gpt4 book ai didi

r - 在 R Markdown 中格式化表格以导出到 MS Word 文档

转载 作者:行者123 更新时间:2023-12-05 05:11:20 35 4
gpt4 key购买 nike

我已经开始使用 expss在 R Markdown 中用于在 Knitr 的帮助下生成表格。我想自动化我需要以 Microsoft Word 格式准备的报告的表格和分析。

编织成 HTML 时,表格看起来很棒。 Word 中的表格显示为纯文本行,不像表格。 expss 是否支持将表格导出到 Word?有关于如何操作的说明吗?

使用 kable 和 dplyr 生成的表格在 Word 中正确显示。但是,我正在努力重现用 expss 制作的 HTML 表格。

library(expss)
data(mtcars)
mtcars = apply_labels(mtcars,
mpg = "Miles/(US) gallon",
cyl = "Number of cylinders",
disp = "Displacement (cu.in.)",
hp = "Gross horsepower",
drat = "Rear axle ratio",
wt = "Weight (1000 lbs)",
qsec = "1/4 mile time",
vs = "Engine",
vs = c("V-engine" = 0,
"Straight engine" = 1),
am = "Transmission",
am = c("Automatic" = 0,
"Manual"=1),
gear = "Number of forward gears",
carb = "Number of carburetors"
)

cro(mtcars$am, mtcars$vs)

我希望我的 Word 表格看起来像可以在此 link 找到的 HTML 表格示例或者在这张 HTML 表格示例图片中

enter image description here

如果它们看起来像我的 R 控制台输出中的表格,我也会很高兴

enter image description here

Word 中的表格输出如下所示:

引擎

V引擎

直列式发动机

传输

自动

12

7

手册

6

7

#总案例

18

14

最佳答案

expss 使用 htmlTable 包进行表格渲染。不幸的是,htmlTable 不支持文字输出。但是,您可以使用 split_table_to_dfkable 函数。它们在 Microsoft Word 中为您提供类似表格的输出。参见示例:

library(expss)
library(knitr)
data(mtcars)
mtcars = apply_labels(mtcars,
mpg = "Miles/(US) gallon",
cyl = "Number of cylinders",
disp = "Displacement (cu.in.)",
hp = "Gross horsepower",
drat = "Rear axle ratio",
wt = "Weight (1000 lbs)",
qsec = "1/4 mile time",
vs = "Engine",
vs = c("V-engine" = 0,
"Straight engine" = 1),
am = "Transmission",
am = c("Automatic" = 0,
"Manual"=1),
gear = "Number of forward gears",
carb = "Number of carburetors"
)

cro(mtcars$am, mtcars$vs) %>%
split_table_to_df() %>%
kable()

关于r - 在 R Markdown 中格式化表格以导出到 MS Word 文档,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/55542838/

35 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com