多个.txt列表到R中的数据帧

Question

我有一个包含44个.txt文件（... /数据）的文件夹。我只想在一个数据帧中收集所有这44个文件中包含的数据。这就是我所做的：

setwd("/Users/setegonz/MEGAsync/ProjetoUFABC-master/results")
library(tidyverse)
list_of_files <- list.files(path = "/Users/setegonz/MEGAsync/ProjetoUFABC-master/data", recursive = TRUE, pattern = "\\.txt$", full.names = TRUE)

df <- list_of_files %>%
  set_names(.) %>%
  map_df(., read_table, .id = "FileName")

这是我的输出：

我想实现两件事：
1.将第二列中分组的所有变量分成两个单独的列。
2.两个将标识名称缩写为诸如“ sub_01”，“ sub_2”等之类的东西。

我想通过使用变体方法来实现这一目标。

谢谢！

Answer 1

看看map_dfr，它获取一个列表并返回一个数据框，其结果行绑定在一起。 这是一个示例：

import * as ts from 'typescript';

export default (program: ts.Program) => {
    return (ctx: ts.TransformationContext) => {
        return (sourceFile: ts.SourceFile) => {
            function visitor(node: ts.Node): ts.Node {
                /**
                 * If that's the kind of node you were looking for,
                 * do something with it and return it. Otherwise:
                 */
                return ts.visitEachChild(node, visitor, ctx);
            }

            return ts.visitEachChild(sourceFile, visitor, ctx);
        };
    };
}

最后一条命令返回一个包含30行（tmp.csv的3个副本）的数据帧。我怀疑：

tsconfig.json

将完全按照您的意愿进行操作。