任何可以将行名和列名添加到 excel 文件中的函数？

Question

我正在使用 "xlsx" 包中的 write.xlsx 函数。

for (i in 1:noctry) {
    for (l in 1:3) {
        write.xlsx(tab110rev[i,,], file=paste(title[l],l,".xlsx"), sheetName = country_code[i],
           col.names=FALSE, row.names=FALSE, append=TRUE)
    }
}

noctry 代表国家数量及其 53
countrylist 是国家/地区代码为数字的国家/地区列表。
tab110rev 是一个数组，其结构为 array(value, c(country, industry, year))

结果是每个国家 sheet，行代表 ISIC 代码，列代表年份。

我想将列名和行名添加到 excel 文件中，但是如您所见，"col.names" 和 "row.names" 选项是合乎逻辑的。写xlsx文件的时候有没有可以添加行名和列名的选项或者函数？

我可以通过加载我刚刚编写的xlsx文件来添加名称并添加行名和列名并将其保存回来但我只想知道是否有可以编写xlsx并添加行名和同时列名。

我试过下面的代码，行名只显示为数字和列名，X1、X2、X3...

for (i in 1:noctry) {
for (l in 1:3) {
rownames(tab110rev[i,l,,]) <- c(isic_code)
colnames(tab110rev[i,l,,]) <- c(year)
write.xlsx(tab110rev[i,l,,], file=paste(title[l],l,".xlsx"), sheetName = country_code[i],
           col.names=TRUE, row.names=TRUE, append=TRUE)
}
}

Answer 1

只需将行名和列名定义为字符串并使用 col.names=TRUE 和 row.names=TRUE:

library(WriteXLS)
x = as.data.frame(replicate(2, rnorm(2))
colnames(x) = c("test", "test1")
rownames(x) = c("test", "test1")

WriteXLS(x, ExcelFileName="temp.xls", col.names=TRUE, row.names=TRUE)

任何可以将行名和列名添加到 excel 文件中的函数？

Any function that can add rownames and colnames into excel file?

r

xlsx