R:当数据帧包含字符串和数字时如何使用writexl

Question

我是R的新手，我正在尝试将数据保存到xlsx文件中。我使用的是writexl (xlsx造成了麻烦)。

当我尝试使用write_xlsx时，似乎在我的数据框中包含字符串和整数会导致问题。

我在这里重新创建了这个问题：

library(writexl)

matrix <- matrix(1,2,2)
block <- cbind(list("ones","more ones"),matrix)
df <- data.frame(block)

data = list("sheet1"=df)

write_xlsx(data, path = "data.xlsx", col_names = FALSE, format_headers = FALSE)

文件data.xlsx正确包含"sheet1"，但为空。我想要

个数1 1

更多的1 1

有没有办法使用write_xlsx得到这个输出？

Answer 1

我通常使用openxlsx包。尝试修改以下代码：

library(openxlsx)
wb <- createWorkbook()
addWorksheet(wb, "Sheet1")
writeData(wb, "Sheet1", df, colNames = FALSE)
saveWorkbook(wb, "test.xlsx", overwrite = TRUE)

Answer 2

我会提出一个关于包的github代码库的问题：https://github.com/ropensci/writexl/issues。

执行此操作：

df <- data.frame(
  X1 = c("ones", "more ones"),
  X2 = c(1, 1),
  X3 = c(1, 1)
)

write_xlsx(df, path = "data.xlsx", col_names = FALSE, format_headers = FALSE)

工作正常。我会说这是因为你代码中的df有列表列：

> str(df)
'data.frame':   2 obs. of  3 variables:
 $ X1:List of 2
  ..$ : chr "ones"
  ..$ : chr "more ones"
 $ X2:List of 2
  ..$ : num 1
  ..$ : num 1
 $ X3:List of 2
  ..$ : num 1
  ..$ : num 1

不确定程序包是否具有此功能。