如何还原重复的记录

怿_mao44

输入文件

1. ##name        count        note
   
2. aa        2        abc        123
   
3. bb        3        bcd        234

复制代码

输出文件（除“count”列被摒弃，其余列均不做改变）

1. ##name        note
   
2. aa        abc        123
   
3. aa        abc        123
   
4. bb        bcd        234
   
5. bb        bcd        234
   
6. bb        bcd        234

复制代码

自己在用$ more file sort|uniq -c 统计记录重复次数想，如果反过来处理，是否可以通过count值还原重复的记录呢?

1. $ uniq --h
   
2. Usage: uniq [OPTION]... [INPUT [OUTPUT]]
   
3. Discard all but one of successive identical lines from INPUT (or
   
4. standard input), writing to OUTPUT (or standard output).
   
5. 
   
6. Mandatory arguments to long options are mandatory for short options too.
   
7.   -c, --count           prefix lines by the number of occurrences

复制代码

rdcwayx

1. awk 'NR==1{print "##name        note"}
   
2.       NR>1{for (i=1;i<=$2;i++) print $1,$3,$4}' infile

复制代码

seesea2517

简单起见就不处理第一行了

1. [seesea@UC ~]$ cat file
   
2. aa        2        abc        123
   
3. bb        3        bcd        234
   
4. [seesea@UC ~]$ sed -r 's/([^ ]*) *([^ ]*) *([^ ]*) *([^ ]*) */yes \1 \3 \4 | head -\2/e' file
   
5. aa abc 123
   
6. aa abc 123
   
7. bb bcd 234
   
8. bb bcd 234
   
9. bb bcd 234

复制代码

dn833

seesee的sed已经出神入化了啊。。。。。。

yestreenstars

回复 4# dn833


    他是个经得起折腾的人

kernel69

这个如何？

1. perl -ane 'print "@F[0,2..$#F]\n"  x $F[1]' filename

复制代码

回复 1# 怿_mao44


   

seesea2517

回复 4# dn833

@yestreenstars

大牛说过用 e 命令的 sed 不纯洁，不算折腾。

菜牛牛

1. 学习学习，哎！awk和sed很无奈

复制代码

怿_mao44

回复 2# rdcwayx

写下我的理解，希望能大家共同学习

    1. 利用“for”进行循环
    2. 设置“i”的初始数值为1
    3. 将“i”与第二列count的数值进行比较
    4. 只要"i"小于count值，则输出该行记录一次，并对“i”进行累加
    5. 直到“i”等于count值，则终止循环，同时已重复"i"次输出该记录

怿_mao44

回复 6# kernel69


    一行perl命令呢。。真不错，羡慕嫉妒恨


这个着实需要每个参数查查什么意义的了，自己对Perl还完全摸不着边。。