Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/75.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
在R中的openxlsx中向Excel工作表添加一行文本_R_Export - Fatal编程技术网

在R中的openxlsx中向Excel工作表添加一行文本

在R中的openxlsx中向Excel工作表添加一行文本,r,export,R,Export,考虑以下代码: install.packages(“openxlsx”) 库(openxlsx) d您可以将“文本”写入工作簿,就像将数据写入工作簿一样 library(openxlsx) d <- data.frame(replicate(2,sample(0:1,10,rep=TRUE))) wb <- createWorkbook() addWorksheet(wb, "Sheet1") writeData(wb, "Sheet1", "This is an exampl

考虑以下代码:

install.packages(“openxlsx”)
库(openxlsx)
d您可以将“文本”写入工作簿,就像将数据写入工作簿一样

library(openxlsx)

d <- data.frame(replicate(2,sample(0:1,10,rep=TRUE)))

wb <- createWorkbook()
addWorksheet(wb, "Sheet1")

writeData(wb, "Sheet1", "This is an example", startCol = 1, startRow = 1)
writeData(wb, "Sheet1", d, startCol = 1, startRow = 3, rowNames = TRUE)

saveWorkbook(wb, "test.xlsx", overwrite = TRUE)
库(openxlsx)
D