将文本根据行数平均分配行写到相关文件中

reyleon

有个文件，数据如下:

1
2
3
4
5
6
7
8
9
10

共10行数据.将这些数据进行平均分配（有不能平均分配的情况，如下所说）。

详细解析如下：

1. 平均分配到两个文件(假设为a,b）中，则a分5行，b分5行 (注：是按顺序分配，就是说前5行写到a文件，后5行写到b文件，而不是1在a中，2在b中，3在a中，4在b中这样，下同....),其内容是：
a:
1
2
3
4
5

b:
6
7
8
9
10

2. 平均分配到三个文件（a,b,c），因为行数不被3整除，则要求a文件分前4行，b分3行，c分3行，其内容是：
a:
1
2
3
4

b:
5
6
7

c:
8
9
10

3. 平均分配到四个文件（a,b,c,d），同第二点，因行数不被4整除，则a分3行，b分3行，c分2行,d分2行,其内容是：
a:
1
2
3

b:
4
5
6

c:
7
8

d:
9
10

4. 平均分配到N个文件(a,b,c,d....) 这样子下去...

----------------

注：以上是【文件是偶数行的情况】，但假如文件行数是奇数行，比如是11行，则：

1. 分配到两个文件(a,b),则a分6行，b分5行
2. 分配到三个文件(a,b,c)，则a分4行，b分4行,c分3行
3. 分配到四个文件(a,b,c,d)，则a分3行，b分3行，c分3行，d分2行
4. 分配到N个文件(a,b,c,d...)，则............


========================
   话说这能写程序么？

chinaboywg

linux split 命令

　　功能说明：切割文件。

　　语　　法：split [--help][--version][-<行数>][-b <字节>][-C <字节>][-l <行数>][要切割的文件][输出文件名]

　　补充说明：split可将文件切成较小的文件，预设每1000行会切成一个小文件。

　　参　　数：

　　-<行数>或-l<行数> 　指定每多少行就要切成一个小文件。

　　-b<字节> 　指定每多少字就要切成一个小文件。支持单位:m,k

　　-C<字节> 　与-b参数类似，但切割时尽量维持每行的完整性。

　　--help 　显示帮助。

　　--version 　显示版本信息。

　　[输出文件名] 　设置切割后文件的前置文件名，split会自动在前置文件名后再加上编号。

　　使用例子：

　　split -b 100m filename

liion631818

1. 
   
2. s=1
   
3. split()
   
4. {
   
5.         lines=$1
   
6.         files=$2
   
7.         if [[ $lines == 0 || $files == 0 ]]; then
   
8.                 exit 0
   
9.         fi
   
10.         max=$(( $1/$2 ))
    
11.         tmp=$(( $max*$files ))
    
12.         if [[ $lines != $tmp ]]; then
    
13.                 (( max++ ))
    
14.         fi
    
15.         echo "==========file $files======="
    
16.         tmp=$(( $max+$s-1 ))
    
17.         seq $s $(( $max+$s-1 ))
    
18.         (( lines=$lines-$max ))
    
19.         (( files-- ))
    
20.         s=$(( tmp+1 ))
    
21.         split $lines $files
    
22. }
    
23. 
    
24. split 11 3
    

复制代码

liion631818

n个分m份，使分的最多的与最小的之间的差最小。是这个意思么

liion631818

前面的太复杂了，耗时

1. 
   
2.         s=1
   
3.         increment=1
   
4.         lines=$1
   
5.         files=$2
   
6.         if [[ $lines == 0 || $files == 0 ]]; then
   
7.                 exit 0
   
8.         fi
   
9.         avg=$(( $1/$2 ))
   
10.         off=$(( $lines-$avg*$files ))
    
11.        
    
12.         for i in `eval echo {1..$files}`; do
    
13.                 if [[ $off -eq 0 ]]; then
    
14.                         increment=0
    
15.                 fi
    
16.                 echo "==========file $i======="
    
17.                 seq $s $(( s+avg+increment-1 ))
    
18.                 s=$(( s+avg+increment-0 ))
    
19.                 (( off-- ))
    
20.         done
    

复制代码

yaozhibing41001

回复 1# reyleon


   
11 个数据 分到5个里面 怎么分法  

reyleon

回复 6# yaozhibing41001


就是平均分配啊，11行的数据分成5个文件，假设是a,b,c,d,e，行数依次为： 3,2,2,2,2

a为：
1
2
3

b:
4
5

c:
6
7

d:
8
9

e:
10
11

11行分为6个文件的话则为：a,b,e,d,e,f ,行数依次为：2，2，2，2，2，1.

关阴月飞

回复 1# reyleon

应该是这个意思：

1. [root@ test]#seq 11 >urifle
   
2. [root@ test]#a="a b c"
   
3. [root@ test]#echo $a |awk 'FNR==NR{a[NR]=$0;nr=NR;next}{n=split($0,b);for(i=1;i<=n;i++){c[i]=int(nr/n)+c[i-1];if(i<=nr%n)c[i]++;for(j=1;j<=nr;j++)if(j>k&&j<=c[i])print a[j]" to "b[i];k=c[i];print ""}}' urfile -
   
4. 1 to a
   
5. 2 to a
   
6. 3 to a
   
7. 4 to a
   
8. 
   
9. 5 to b
   
10. 6 to b
    
11. 7 to b
    
12. 8 to b
    
13. 
    
14. 9 to c
    
15. 10 to c
    
16. 11 to c
    
17. 
    
18. [root@ test]#seq 10 >urifle
    
19. [root@ test]#echo $a |awk 'FNR==NR{a[NR]=$0;nr=NR;next}{n=split($0,b);for(i=1;i<=n;i++){c[i]=int(nr/n)+c[i-1];if(i<=nr%n)c[i]++;for(j=1;j<=nr;j++)if(j>k&&j<=c[i])print a[j]" to "b[i];k=c[i];print ""}}' urfile -
    
20. 1 to a
    
21. 2 to a
    
22. 3 to a
    
23. 4 to a
    
24. 
    
25. 5 to b
    
26. 6 to b
    
27. 7 to b
    
28. 
    
29. 8 to c
    
30. 9 to c
    
31. 10 to c
    
32. 
    

复制代码

reyleon

回复 5# liion631818

你这个确实可以对数字进行分行处理并写到文件中，也满足要求。但我帖子中描述的只是一个内容为数字的文本示例，而实际上文本是“以行为单位的任意类型的文本内容”，所以你的脚本可能还需要改改。

我这里有个脚本，不过是别人的思路，然后我整理了下，是可以满足我的需求的！

1. #!/bin/sh
   
2. 
   
3. if [ $# -ne 2 ];then
   
4.         echo "U: sh $0 [file] [fnumber]"
   
5.         echo "E: sh $0 myfile 3"
   
6.         exit 1
   
7. fi
   
8. 
   
9. srcfile=$1 #原始文件
   
10. fnumber=$2 #需要拆分的文件个数
    
11. 
    
12. eval $(cat $srcfile | awk -vn=$fnumber 'END{print "total="NR,"fline="int(NR/n),"extra="NR%n,"cline="int(NR/n)+1}')
    
13. # total:原始文件总行数
    
14. # fline:拆分文件平均行数
    
15. # extra:拆分文件扩展行数
    
16. # cline:当前拆分文件行数
    
17. 
    
18. i=1
    
19. iline=1
    
20. while true;do
    
21.         filename="file$i"
    
22.         # 按行的顺序分别写入文件中,满足我的需求
    
23.         if [ $extra = 0 ];then
    
24.                 echo "$filename lines: $fline"
    
25.                 tail -n +$iline $srcfile | head -n $fline > $filename
    
26.                 iline=$((iline+fline))
    
27.         else
    
28.                 echo "$filename lines: $cline"
    
29.                 tail -n +$iline $srcfile | head -n $cline > $filename
    
30.                 iline=$((iline+cline))
    
31.                 extra=$((extra-1))
    
32.         fi
    
33.         ((i++))
    
34.         [ $iline -ge $total ] && exit 0
    
35. done

复制代码

shencz2000

楼主，你的要求太严格，这样有用吗？能不能够简单一点呢？这样就可以直接使用split进行处理了。比如说文件数要求6个，但是分成了7个也行。另外，最后一个文件行数少一些也没有关系。这样行吗？