Question

我有大约100个文本文件，我已加载到R：

myFiles <- (Sys.glob("C:/../.../*.txt"))
dataFiles <- lapply(myFiles, read.table)

文件有不同的行数，但都有4列。第一列是名称，最后三列是坐标。

文件示例：

[[1]]
         n         x        y        z
1       Bal   0.459405 -238.3565 -653.5304
2       tri   0.028990 -224.5127 -600.0000
.....
14      mon   24.514049 -264.7673 -627.0550

[[2]]
        n         x        y        z
1      bal 2.220795 -284.1022 -651.8112
2      reg 2.077444 -290.4326 -631.3667
...
8      tri  32.837284 -347.2596 -633.0000

所有文件中都有一行：例如row.name =＆＃34;三＆＃34 ;.我想在所有100个文件中找到该行的坐标（x，y，z）的摘要（中位数，平均值，最大值，最小值）。我在一个文件中找到了一些行摘要的例子，但没有找到多个文件的摘要。我想我需要使用lapply但不知道如何从它开始。另外，我需要总结以后根据我的值创建类。我发现＆＃34;摘要＆＃34;功能是为了太过分了。如果有任何其他功能可能更有用，你可以建议用于taht目的，这将是有帮助的。任何帮助都会很棒！

谢谢！

Answer 1

要将所有这些“三”行拉到一起，你可以这样做：

df <- do.call("rbind", lapply(dataFiles, function(z) z[z$n=="tri",]))

summary(df)

r多个文件的行摘要

1 个答案: