将完整的数据框写入R中的Excel工作表答案

【问题标题】：Write an intact data frame to an excel sheet in R将完整的数据框写入R中的Excel工作表
【发布时间】：2020-07-02 10:53:28
【问题描述】：

我在 R 中加载了一个工作表表单 excel，并希望使用原始列名将其中的一部分写入新工作表。第一次尝试：

weekdata <-  Data  [ which(Data$week ==weeknr ),]
  
write.xlsx2(x=weekdata, file=Document, 
            sheetName =BLAD , row.names = FALSE, append = TRUE)

weekdata as seen in excel 列中的数据全部在第一个字段中作为列表： c("2020 6", "2020 6", "2020 6", "2020 6", "2020 6",...) 要逐行获取数据，我必须设置 row.names=TRUE，但这会增加一列。

第二次尝试是使用data.frame函数：

weekdata <- data.frame( Data  [ which(Data$week ==weeknr ),])

现在的问题是使用特殊符号时列名会发生变化：（从“# bl”到“X..bl”）

有我不知道的简单解决方案吗？

【问题讨论】：

标签： r excel variable-names writexl

【解决方案1】：

我通过添加这一行找到了一些解决方案 names(weekdata)<- names(Data)

【讨论】：