나는이처럼 보이는 빅 데이터 프레임이 펄

Question

에서 데이터 프레임의 열을 두 배로하는 방법 : I가 시도

name1 A A A A G G 
    name2 C C C C T T 
    name3 A A G G G G 
    name4 H H G G G G 
    name5 C C - - T T 
    name6 C C C C C C 
    name7 A A G G G G 
    name8 G G G G A A 

:

name1 A A G 
    name2 C C T 
    name3 A G G 
    name4 H G G 
    name5 C - T 
    name6 C C C 
    name7 A G G 
    name8 G G A 

나는에 데이터 프레임이 변경 예상 R을 사용하여이 작업을 수행 할 수 있지만 메모리 제한으로 인해 수행 할 수 없습니다. 펄 솔루션을 도와주세요. 펄 스크립트 작성법을 모르겠습니다. 감사.

Answer 1

펄 한 줄

perl -lane 'print join "\t", shift(@F), map {($_) x 2} @F' data.txt 

Answer 2

perl -lane' 
    BEGIN { $, ="\t" } 
    print shift(@F), map{ ($_)x2 } @F 
' file 

출력

name1 A  A  A  A  G  G 
name2 C  C  C  C  T  T 
name3 A  A  G  G  G  G 
name4 H  H  G  G  G  G 
name5 C  C  -  -  T  T 
name6 C  C  C  C  C  C 
name7 A  A  G  G  G  G 
name8 G  G  G  G  A  A