r - 读取水平组织的 CSV 文件

Question

在 R 中，是否有类似的函数read.csv读取标题在左侧（或右侧）而不是顶部的文件，并且数据从左到右组织？

所以数据看起来像：

var1,1,2,3,4,5

查看read.tableand的文档read.csv，似乎没有弹出任何内容。我看到使用这些函数的最佳选择是使用read.table然后构造另一个表，其列是原始数据的行，依此类推。

Answer 1

假设您的文件名为“data.csv”，它包含：

var1,1,2,3,4,5,6
var2,2.1,3.9,4.6,5.2,6.1
var3,M,F,M,F,M,M

注意var1并var3有 6 个值，但var2只有 5 个。所以，想法是读取数据，转置它，然后使用read.csv.

read.tcsv = function(file, header=TRUE, sep=",", ...) {

  n = max(count.fields(file, sep=sep), na.rm=TRUE)
  x = readLines(file)

  .splitvar = function(x, sep, n) {
    var = unlist(strsplit(x, split=sep))
    length(var) = n
    return(var)
  }

  x = do.call(cbind, lapply(x, .splitvar, sep=sep, n=n))
  x = apply(x, 1, paste, collapse=sep) 
  out = read.csv(text=x, sep=sep, header=header, ...)
  return(out)

}

然后，你可以这样做：

read.tcsv("data.csv")

  var1 var2 var3
1    1  2.1    M
2    2  3.9    F
3    3  4.6    M
4    4  5.2    F
5    5  6.1    M
6    6   NA    M