r - 如何将 table1 包中的表保存到 CSV 文件中

Question

我想弄清楚如何将使用table1包开发的表格保存到excel文件或图片中。

在 website提到“可以使用export =“file_name”将表导出到CSV”，但是当我尝试这样做时，没有保存任何内容。

我还注意到有人发布了question询问如何将此表另存为图像，但没有回复。

知道如何解决这个问题吗？

提前非常感谢。

Answer 1

table1 包具有 as.data.frame(x) 函数。 因此，一旦您的 table1 按照您想要的方式输出，请将其定义为一个对象。

    `dat <- expand.grid(id=1:10, sex=c("Male", "Female"), treat=c("Treated", "Placebo"))
dat$age <- runif(nrow(dat), 10, 50)
dat$age[3] <- NA  # Add a missing value
dat$wt <- exp(rnorm(nrow(dat), log(70), 0.2))

label(dat$sex) <- "Sex"
label(dat$age) <- "Age"
label(dat$treat) <- "Treatment Group"
label(dat$wt) <- "Weight"

units(dat$age) <- "years"
units(dat$wt) <- "kg"

# basic table 1
tab1_html<- table1(~ sex + age + wt | treat, data=dat)
tab1_df <- as.data.frame(tab1html)`   

之前你会给你:

现在应该给你