my @comparisons = reverse map { [ ($_-15)*2000, $_ ] } 16 .. 24;