找出缺少的行

心若寒江雪

此問題有兩種可能，現(xiàn)在列舉出每種可能的一個特定的文本信息：

類型1

1. 12 R1C1
   
2. 12 R1C2
   
3. 12 R1C3
   
4. 12 R1C4
   
5. 12 R2C1
   
6. 12 R2C2
   
7. 12 R2C3
   
8. 12 R2C4
   
9. 12 R3C1
   
10. 12 R3C2
    
11. 12 R3C4

復制代碼

類型2

1. 12 R1C1
   
2. 12 R1C2
   
3. 12 R1C3
   
4. 12 R2C1
   
5. 12 R2C2
   
6. 12 R2C3
   
7. 12 R2C4
   
8. 12 R3C1
   
9. 12 R3C2
   
10. 12 R3C4

復制代碼

問題描述：
數(shù)字12表示一共有12行
目的是找出缺少那一行
比如第一類就缺少了R3C3，而第二種則缺少了R1C4和R3C3

心若寒江雪

想到一個這樣的思路，但是感覺有點費事，求大牛給出高大上解決方法

1. for i in `seq 3`
   
2. do
   
3.     for i in `seq 4`
   
4.     do
   
5.          something
   
6.     done
   
7. done

復制代碼

qq58945591

菜鳥路過，高大上沒有。笨辦法一個。學習shell，喜歡各種折騰，雖然有點牽強。湊合著交作業(yè)了。等大神出壓縮版。
for i in `seq 1 3`
do
        for j in `seq 1 4`
        do
        a=R${i}C${j}
        echo "12 $a" >> work2
        sleep 1
        done
done
diff -u work work2





--- work        2014-09-18 00:12:33.670199660 +0800
+++ work2        2014-09-18 01:50:41.311853027 +0800
@@ -1,10 +1,12 @@
12 R1C1
12 R1C2
12 R1C3
+12 R1C4
12 R2C1
12 R2C2
12 R2C3
12 R2C4
12 R3C1
12 R3C2
+12 R3C3
12 R3C4

reb00t

1. <?php
   
2. 
   
3. $f = file('200.txt');
   
4. foreach ($f as $k => $v) {
   
5.   $arr = preg_split('/C/', trim($v));
   
6.   $newarr[$arr[0]].=$arr[1];
   
7. }
   
8. foreach ($newarr as $kk => $vv) {
   
9. for ($i=1; $i <=4 ; $i++) {
   
10.         if(strpos("$vv", "$i")===false)
    
11.                 echo  $kk."C".$i."\n";
    
12. }
    
13. 
    
14. }
    
15. 
    
16. ?>

復制代碼

已測試～

1. awk -FC '{a[$1]=a[$1]?a[$1]$2:$2}END{for(i in a) for(n=1;n<=4;n++)if(!index(""a[i]"",""n"")) print i"C"n}' 4

復制代碼

坐等awk精簡代碼！

reyleon

文本是已經(jīng)排好序了的么?

Herowinter

回復 1# 心若寒江雪

1. awk 'BEGIN{for(i=1;i<=3;i++)for(j=1;j<=4;j++)a["R"i,"C"j]} {delete a[substr($2,1,2),substr($2,3)]} END{for(i in a)print i}' 1.txt
   
2. R3C3
   
3. 
   
4. awk 'BEGIN{for(i=1;i<=3;i++)for(j=1;j<=4;j++)a["R"i,"C"j]} {delete a[substr($2,1,2),substr($2,3)]} END{for(i in a)print i}' 2.txt
   
5. R1C4
   
6. R3C3

復制代碼

Kasiotao

回復 1# 心若寒江雪
。。。寫的不好輕拍

1. awk -F'[RC]' '{r=int(i/4+1);c=i%4+1;if(r==$2&&c==$3)i++;else{print $1" R"r"C"c;i+=2}}' testfile

復制代碼

reyleon

1. awk '{k=substr($2,1,3);a[$1 FS k];b[$1 FS $2]}END{for(i in a)for(j=0;j++<4;)if(!(i""j in b))print i""j}'

復制代碼