论坛徽章:: 0

电梯直达

1楼 [收藏(0)] [报告]

发表于 2015-05-11 20:22 |只看该作者 |倒序浏览

求教：文件1是这种格式：第一列是品种名，第一行是标记。
               a1 a2 a3 a4 a5 a6 a7
./p3-1 0/1 0/0 0/0 0/0 0/0 0/0 0/0
./p3-10 0/1 0/0 0/0 0/0 0/0 0/0 0/0
./p3-101 0/1 0/0 0/0 0/0 0/0 0/0 0/0
./p3-103 0/1 0/0 0/0 0/0 0/0 0/0 0/0
./p3-104 0/1 0/0 0/0 0/0 0/0 0/0 0/0
./p3-105 0/1 0/0 0/0 0/0 0/0 0/0 0/0
./p3-106 0/1 0/0 0/0 0/0 0/0 0/0 0/0
./p3-107 0/1 0/0 0/0 0/0 0/0 0/0 0/0
./p3-108 0/1 0/0 0/0 0/0 0/0 0/0 0/0
./p3-109 0/1 0/0 0/0 0/0 0/0 0/0 0/0

如何转行成文件2的格式：
         a1 a2 a3 a4 a5 a6 a7
./p3-1 0 0 0 0 0 0 0
./p3-1 1 0 0 0 0 0 0
./p3-10 0 0 0 0 0 0 0
./p3-10 1 0 0 0 0 0 0
./p3-101 0 0 0 0 0 0 0
./p3-101 1 0 0 0 0 0 0
./p3-103 0 0 0 0 0 0 0
./p3-103 1 0 0 0 0 0 0
./p3-104 0 0 0 0 0 0 0
./p3-104 1 0 0 0 0 0 0
./p3-105 0 0 0 0 0 0 0
./p3-105 1 0 0 0 0 0 0
./p3-106 0 0 0 0 0 0 0
./p3-106 1 0 0 0 0 0 0
./p3-107 0 0 0 0 0 0 0
./p3-107 1 0 0 0 0 0 0
./p3-108 0 0 0 0 0 0 0
./p3-108 1 0 0 0 0 0 0
./p3-109 0 0 0 0 0 0 0
./p3-109 1 0 0 0 0 0 0
通过什么脚本转换，谢谢指导~

格式转换

文库|博客

聆雨淋夜

家境小康

论坛徽章:: 22

2楼 [报告]

发表于 2015-05-11 20:43 |只看该作者

awk 'NR>1{a=gensub(/([0-9])\//,"\\1","g",$0);b=gensub(/\/([0-9])/,"\\1","g",$0);print a"\n"b}' file
./p3-1 01 00 00 00 00 00 00
./p3-1 01 00 00 00 00 00 00
./p3-10 01 00 00 00 00 00 00
./p3-10 01 00 00 00 00 00 00
./p3-101 01 00 00 00 00 00 00
./p3-101 01 00 00 00 00 00 00
./p3-103 01 00 00 00 00 00 00
./p3-103 01 00 00 00 00 00 00
./p3-104 01 00 00 00 00 00 00
./p3-104 01 00 00 00 00 00 00
./p3-105 01 00 00 00 00 00 00
./p3-105 01 00 00 00 00 00 00
./p3-106 01 00 00 00 00 00 00
./p3-106 01 00 00 00 00 00 00
./p3-107 01 00 00 00 00 00 00
./p3-107 01 00 00 00 00 00 00
./p3-108 01 00 00 00 00 00 00
./p3-108 01 00 00 00 00 00 00
./p3-109 01 00 00 00 00 00 00
./p3-109 01 00 00 00 00 00 00

复制代码

实战分享：从技术角度谈机器学习入门| 【大话IT】RadonDB低门槛向MySQL集群下战书 | ChinaUnix打赏功能已上线！ | 新一代分布式关系型数据库RadonDB知多少？

liion631818

富足长乐

论坛徽章:: 10

3楼 [报告]

发表于 2015-05-11 20:43 |只看该作者

awk 'NR>1{line1=line2=$1;for(i=2; i<=NF;i++){split($i, arr, "/");line1=line1"\t"arr[1];line2=line2"\t"arr[2]}print line1"\n"line2;next}1'

复制代码

回复 1# 紫风8824

实战分享：从技术角度谈机器学习入门| 【大话IT】RadonDB低门槛向MySQL集群下战书 | ChinaUnix打赏功能已上线！ | 新一代分布式关系型数据库RadonDB知多少？

jason680

富可敌国

论坛徽章:: 145

4楼 [报告]

发表于 2015-05-11 20:57 |只看该作者

回复 1# 紫风8824

$ awk -F'[ \t]+' '$1==""{print;next}{for(n=2;n<=NF;n++){split($n,a,"/");b=b"\t"a[1];c=c"\t"a[2]};printf("%-10s%s\n%-10s%s\n",$1,b,$1,c);b=c=""}' FILE
               a1       a2       a3       a4       a5       a6       a7
./p3-1 0 0 0 0 0 0 0
./p3-1 1 0 0 0 0 0 0
./p3-10    0 0 0 0 0 0 0
./p3-10    1 0 0 0 0 0 0
./p3-101    0 0 0 0 0 0 0
./p3-101    1 0 0 0 0 0 0
./p3-103    0 0 0 0 0 0 0
./p3-103    1 0 0 0 0 0 0
./p3-104    0 0 0 0 0 0 0
./p3-104    1 0 0 0 0 0 0
./p3-105    0 0 0 0 0 0 0
./p3-105    1 0 0 0 0 0 0
./p3-106    0 0 0 0 0 0 0
./p3-106    1 0 0 0 0 0 0
./p3-107    0 0 0 0 0 0 0
./p3-107    1 0 0 0 0 0 0
./p3-108    0 0 0 0 0 0 0
./p3-108    1 0 0 0 0 0 0
./p3-109    0 0 0 0 0 0 0
./p3-109    1 0 0 0 0 0 0