主页 / unix / 问题 / 485923
Accepted
Molly_K
Asked: 2018-12-05 07:32:35 +0800 CST

如何将内容回显到 cat 生成的一系列新文件中

  • 772

我想编写一个循环来生成 22 个 R 脚本，其中的内容在 echo 中生成。这个循环到底是哪里出了问题，怎么也拿不到对应内容的22个文件呢？

我测试了echo "i want that file" > file.r

它工作正常。然后我测试了，它被视为两个独立的过程。首先它回显文本，然后生成 22 个空文件。

for i in `seq 1 22`; do
    echo "a <- read.delim('file${i}.txt', header=T, check.names=FALSE);
        library('splitstackshape');
        loc1 <- cSplit(a, 'V1', ':');
        rm(a);
        out <- cbind.data.frame(loc1$V1_1, loc1$V1_2);
        write.table(out, 'out_file${i}.txt', sep='\t', row.names=F, quote=F)"; 
> build_file${i}.r; done

然后我试了这个..还是不行..

    for i in `seq 1 22`; do
    echo "a <- read.delim("file${i}.txt", header=T, check.names=FALSE);
    library("splitstackshape");
    loc1 <- cSplit(a, "V1", ":");
    rm(a);
    out <- cbind.data.frame(loc1$V1_1, loc1$V1_2);
    write.table(out, "out_file${i}.txt", sep="\t", row.names=F, quote=F)";
    cat > loc_chr${i}.r; done
echo cat

2 个回答

  1. Best Answer

    不确定我是否完全遵循您脚本中的引号以及您希望cat命令执行的操作，因为它从非重定向标准输入读取，即可能是您的键盘。像这样的东西怎么样

    for i in `seq 1 22`
  do cat <<- EOF > loc_chr${i}.r
"a <- read.delim("file${i}.txt", header=T, check.names=FALSE);
    library("splitstackshape");
    loc1 <- cSplit(a, "V1", ":");
    rm(a);
    out <- cbind.data.frame(loc1$V1_1, loc1$V1_2);
    write.table(out, "out_file${i}.txt", sep="\t", row.names=F, quote=F)"
EOF
   done
    • 1

  2. 您的第一个代码示例不起作用，因为它有> build_file${i}.r自己的行，它没有将任何内容重定向到 20 个文件中。附加> build_file${i}.r到您的末尾echo。

    您的第二个代码示例由于cat位于底部而无法正常工作。您不提供要cat连接的内容，因此它正在等待输入。

    您应该删除该cat行，并附> loc_chr${i}.r加到您的echo.

    for i in `seq 1 22`; do
echo "a <- read.delim("file${i}.txt", header=T, check.names=FALSE);
library("splitstackshape");
loc1 <- cSplit(a, "V1", ":");
rm(a);
out <- cbind.data.frame(loc1$V1_1, loc1$V1_2);
write.table(out, "out_file${i}.txt", sep="\t", row.names=F, quote=F)" > loc_chr${i}.r
done
    • 0

相关问题