r - 将 R 中的 XLSX 文件格式化为自定义文本块

Question

我想读取一个 xlsx 文件，我想将文件中的数据转换成一个长文本字符串。我想以一种智能的方式格式化这个字符串，比如每一行都包含在括号“()”中，并将数据保存在一个逗号分隔的值字符串中。因此，例如，如果这是 xlsx 文件看起来像这样..

one,two,three
x,x,x
y,y,y
z,z,z

格式化字符串后看起来像

header(one,two,three)row(x,x,x)row(y,y,y)row(z,z,z)

你将如何使用 R 完成这项任务？

我的第一直觉是这样的……但我想不通……

library(xlsx)
sheet1 <- read.xlsx("run_info.xlsx",1)
paste("(",sheet1[1,],")")

Answer 1

这对我有用：

DF <- read.xlsx("run_info.xlsx",1)

paste0("header(", paste(names(DF), collapse = ","), ")", 
       paste(paste0("row(", apply(DF, 1, paste, collapse = ","), ")"),
             collapse = ""))
# [1] "header(one,two,three)row(x,x,x)row(y,y,y)row(z,z,z)"