<rt id="bn8ez"></rt>
<label id="bn8ez"></label>
  • 

    • <span id="bn8ez"></span>
    

    <label id="bn8ez"><meter id="bn8ez"></meter></label>
    

    
    

    




    







												


        

    
	
    
		
			

    

    weidagang2046的專欄
    

    物格而后知致
    

    

    

    隨筆 - 8, 文章 - 409, 評論 - 101, 引用 - 0
    

    


    		
	
    

    

    
	
    
		
			
    
				數據加載中……
			
    
		    		
		
			
    
				
					
	
    
		
    
			適應度計算腳本
		
    
		
    
		數據文件由兩列數字組成，列間由空格隔開。

    #!/usr/bin/perl?-w

    $arg_num?=?@ARGV;

    $arg_num?>?0?||?die?"Usage:\nperl?$0?[file]\n";

    open(FH,?$ARGV[0])?||?die?"Can't?open?file?$ARGV[0]\n";

    @lines?=?<FH>;

    foreach?$line?(@lines)
    {
    ????    chomp($line);
    ????    @nums?=?split('?',?$line);
    ????    $fitness?+=?1?-?abs($nums[1]?-?$nums[0])?/?(abs($nums[0])?+?1e-10);
    ????    $count++;
    }

    if($count?>?0)
    {
    ????    $fitness?/=?$count;
    ????    print?$fitness,?"\n";
    }
    else
    {
    ????    print?"0\n";
    }
    
		
    
		
    
			posted on 2006-03-24 00:06 weidagang2046 閱讀(284) 評論(0)  編輯  收藏  所屬分類: Perl 
		
    
	
    
	
	


	


    
	    
    




    








    

				
			
    
		    		
	
    
	
    
		
			

		
	
    

    


    







    
        
	



主站蜘蛛池模板：
一级毛片a免费播放王色|
真正全免费视频a毛片|
国产hs免费高清在线观看|
三年片免费观看大全国语|
亚洲第一成年网站视频|
亚洲第一页中文字幕|
久久精品国产亚洲一区二区|
国产成人免费片在线观看|
我的小后妈韩剧在线看免费高清版
|
www亚洲精品久久久乳|
亚洲日本va一区二区三区|
亚洲男女一区二区三区|
亚洲精品视频在线免费|
国产AV无码专区亚洲AVJULIA|
免费一级毛片清高播放|
啊v在线免费观看|
全亚洲最新黄色特级网站
|
ww在线观视频免费观看w|
人碰人碰人成人免费视频|
一级特级女人18毛片免费视频
|
亚洲精品无码专区久久同性男|
免费国产人做人视频在线观看|
成年女人永久免费观看片|
国产免费人人看大香伊|
亚洲福利在线播放|
久久亚洲私人国产精品|
亚洲首页国产精品丝袜|
免费在线观看自拍性爱视频|
中文字幕免费在线视频|
真实国产乱子伦精品免费|
成人免费黄色网址|
亚洲一区二区视频在线观看|
亚洲gv白嫩小受在线观看|
国产精品亚洲精品青青青
|
亚洲国产成人精品无码久久久久久综合|
男人的天堂亚洲一区二区三区
|
无码A级毛片免费视频内谢|
免费看国产成年无码AV片|
伊伊人成亚洲综合人网7777|
亚洲免费一级视频|
免费无码又爽又刺激一高潮|