☰

選択比較基準に従って配列要素数を記録する方法

tag-icon • tag-icon bash shell-script awk scripting
選択比較基準に従って配列要素数を記録する方法

2x2の配列を持つ多くのファイルがたくさんあります。この例では、1つのファイル（ファイル1）のみを表示します。

入力ファイル（ファイル1）：

1: 6.1703
 541.631 46.0391

2: 6.1930
 537.446 45.9239

3: 6.1931
 177.171 288.579

4: 6.1939
 167.171 298.579

5: 8.2281
 533.686 53.7245

6: 8.6437
 519.219 65.0547

7: 9.0823
 484.191 95.0753

8: 9.3884
 237.75 240.082

9: 9.4701
 167.525 246.234

10: 9.7268
 411.929 70.7877

まず、各行列の位置（1,2）の値を見て6.1937に近く、要素（2,1）の値が大きい場合は選択する必要があります。この例では、選択した値は6.1930でなければなりません。

第二に、より大きな要素（2,2）値を持つ各行列の位置（1,2）から最も低い値を選択する必要があります。この例で選択した値は 6.1931 です。

したがって、出力は次のようになります

 6.1930  6.1931

答え1

Perlが構造に来ます：

#!/usr/bin/perl
use warnings;
use strict;

my $close_to = 6.1937;

my ($close, $lowest);

$/ = q();
while (<>) {
    my @arr = split;
    if ((! defined $close || abs($arr[1] - $close_to) < abs($close - $close_to))
        && $arr[2] > $arr[3]
        ) {
        $close = $arr[1];
    }
    if ((! defined $lowest || $arr[1] < $lowest)
        && $arr[2] < $arr[3]
        ) {
        $lowest = $arr[1];
    }
    if (eof) {
        print "$close $lowest\n";
        undef $close;
        undef $lowest;
    }
}

別名で保存script.pl、別名で電話script.pl file1 file2 file3...

関連情報