2 つの文字列を 2 つの別々の列として読み込みます。

Question

subこれを行うには、次の機能を使用できますawk。

awk 'sub(/./,"& ",$2)1;' file

タブ区切りの出力が必要な場合は、次のものを使用できます。

awk -v OFS="\t" 'sub(/./,"&\t",$2)1;' file

またはさまざまな他のツールから：

真珠

perl -alne '$F[1]=~s/./$& /; print "@F"' file

またはタブ区切りの出力の場合：

perl -alne '$F[1]=~s/./$&\t/; print join "\t",@F' file

その他sed

sed  's/^[[:alnum:]]*[[:blank:]]*./& /' file

シェル

while read -r snp nt rest; do 
    printf "%s\t%s\t%s\t%s\n" "$snp" "${nt:0:1}" "${nt:0:1}" "$rest"
done < file

Answer 1

subこれを行うには、次の機能を使用できますawk。

awk 'sub(/./,"& ",$2)1;' file

タブ区切りの出力が必要な場合は、次のものを使用できます。

awk -v OFS="\t" 'sub(/./,"&\t",$2)1;' file

またはさまざまな他のツールから：

真珠

perl -alne '$F[1]=~s/./$& /; print "@F"' file

またはタブ区切りの出力の場合：

perl -alne '$F[1]=~s/./$&\t/; print join "\t",@F' file

その他sed

sed  's/^[[:alnum:]]*[[:blank:]]*./& /' file

シェル

while read -r snp nt rest; do 
    printf "%s\t%s\t%s\t%s\n" "$snp" "${nt:0:1}" "${nt:0:1}" "$rest"
done < file

おすすめ記事