대용량 파일을 열별로 분할하고 헤더의 값을 파일 이름으로 사용

헤더와 데이터가 포함된 탭으로 구분된 큰 텍스트 파일이 있습니다. 파일을 열별로 더 작은 파일로 분할하고 헤더를 제외하고 파일 이름을 열 이름으로 지정하고 싶습니다.

pos    red    green    blue
123    0|0    1|0      0|0
321    1|0    1|0      0|0
231    0|0    0|0      0|0
213    0|0    1|0      1|0

파일을 다음과 같이 분할해야 합니다.

pos.txt:
123
321
231
213

red.txt:
0|0
1|0
0|0
0|0

green.txt:
1|0
1|0
0|0
1|0

blue.txt:
0|0
0|0
0|0
1|0

나는 시도했다:

awk 'NR==1{h=$0; next}
!seen[$3]++{f=${h[$3]}".txt"; print >> f}' infile

하지만 결코 효과가 없었습니다 ...