按列拆分文件

Question

我知道cut命令可以从文件中删除一个列,但是我可以使用什么来将文件拆分成多个文件,以便每个文件在该列中被命名为第一行,并且生成的数量相同原始文件中有列的文件

示例(编辑)

列由TAB分隔,可以具有不同的长度.我想第一个文件实际上有行的名称.

Probe File1.txt File2.txt File3.txt
"1007_s_at" 7.84390328616472 7.60792223630275 7.77487266222512
...

另外一点是这个原始文件非常庞大,所以我想要一些可以在一次运行中拆分的解决方案.那不是反复叫做削减

Answer 1

可以用一行awk做到:

$ cat test.tsv
field1  field2  field3  field4
asdf    asdf    asdf    asdf
lkjlkj  lkjlkj  lkjlkj  lkjlkj
feh     feh     feh     bmeh

$ awk -F'\t' 'NR==1 {  for(i=1;i<=NF;i++) { names[i] = $i }; next } { for(i=1;i<=NF;i++) print $i >> names[i] }' test.tsv

$ ls
field1  field2  field3  field4  test.tsv

$ cat field4
asdf
lkjlkj
bmeh

编辑包括Tab分离器礼貌Glenn Jackman

加成

从字段中删除双引号:

awk -F'\t' 'NR==1 {  for(i=1;i<=NF;i++) { names[i] = $i }; next } { for(i=1;i<=NF;i++) {gsub(/"/,"",$i); print $i >> names[i] }}' example.tsv

额外增加

从字段中删除双引号,仅在字段的开头或结尾处:

awk -F'\t' 'NR==1 {  for(i=1;i<=NF;i++) { names[i] = $i }; next } { for(i=1;i<=NF;i++) {gsub(/^"|"$/,"",$i); print $i >> names[i] }}' example.tsv