changed exponentials scoring to wi+W+1 exp

ding-lab · Sep 27, 2017 · c73d9ce · c73d9ce
1 parent 9079018
commit c73d9ce
Showing 1 changed file with 4 additions and 5 deletions.
diff --git a/lib/TGI/Mutpro/Main/Network.pm b/lib/TGI/Mutpro/Main/Network.pm
@@ -494,11 +494,10 @@ sub closenessCentrality {
 
 sub exponential {
 	my ( $this , $weight , $geodesic ) = @_;
-	my $weightExp = exp( -1 * abs( $weight ) / $this->{'weight_scale'} );
-	my $geodesicExp = exp( -1 * abs( $geodesic ) / $this->{'length_scale'} );
-	my $sign = 1;
-	if ( $weight < 0 ) { $sign = -1; }
-	my $score = $sign * $weightExp * $geodesicExp;
+	my $weightExp = abs( $weight / $this->{'weight_scale'} );
+	my $geodesicExp = $geodesic / $this->{'length_scale'};
+	my $weightShifted = $weight + $MAXWEIGHT + 1;
+	my $score = $weightShifted * exp( $weightExp - $geodesicExp );
 	return $score;
 }