将R中的XLSX文件格式化为自定义文本blob

时间:2016-05-05 21:20:24

标签: r csv format r-xlsx

我想读取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,],")")

1 个答案:

答案 0 :(得分:2)

这对我有用:

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)"