comparison flys-artifacts/src/main/java/de/intevation/flys/artifacts/math/fitting/InvLogLinear.java @ 3181:de67497de5a0

Completed inverse functions. flys-artifacts/trunk@4796 c6561f87-3c4e-4783-a992-168aeb5c3f6f
author Sascha L. Teichmann <sascha.teichmann@intevation.de>
date Tue, 26 Jun 2012 10:54:12 +0000
parents 59b14bc676ec
children
comparison
equal deleted inserted replaced
3180:4d5b15049ac2 3181:de67497de5a0
1 package de.intevation.flys.artifacts.math.fitting; 1 package de.intevation.flys.artifacts.math.fitting;
2 2
3 public class InvLogLinear 3 public class InvLogLinear
4 extends Function 4 extends Function
5 { 5 {
6 public static final Derivative DERIVATIVE =
7 new Derivative("Q'(W) = e^(W/a)/(a*m)") {
8
9 @Override
10 public de.intevation.flys.artifacts.math.Function
11 instantiate(double [] parameters)
12 {
13 final double _1a = 1d/parameters[0];
14 final double _1am = 1d/(parameters[0] * parameters[1]);
15
16 return new de.intevation.flys.artifacts.math.Function() {
17 @Override
18 public double value(double W) {
19 return Math.exp(W*_1a)*_1am;
20 }
21 };
22 }
23 };
6 public static final Function INSTANCE = new InvLogLinear(); 24 public static final Function INSTANCE = new InvLogLinear();
7 25
8 public InvLogLinear() { 26 public InvLogLinear() {
9 // TODO: Implement me! 27 super(
28 "inv-log-linear",
29 "Q(W)=(e^(W/a)-b)/m",
30 new String [] { "a", "m", "b" });
10 } 31 }
11 32
12 @Override 33 @Override
13 public double value(double W, double [] parameters) { 34 public double value(double W, double [] parameters) {
14 // TODO: Implement me! 35 double a = parameters[0];
15 return 0d; 36 double m = parameters[1];
37 double b = parameters[2];
38 return (Math.exp(W/a) - b)/m;
16 } 39 }
17 40
18 @Override 41 @Override
19 public double [] gradient(double Q, double [] parameters) { 42 public double [] gradient(double W, double [] parameters) {
20 // TODO: Implement me! 43 double a = parameters[0];
21 return null; 44 double m = parameters[1];
45 double b = parameters[2];
46 double eWa = Math.exp(W/a);
47 return new double [] {
48 -(W*eWa)/(a*a*m)
49 -(eWa-b)/(m*m),
50 -1/m
51 };
22 } 52 }
23 53
24 @Override 54 @Override
25 public Derivative getDerivative() { 55 public Derivative getDerivative() {
26 // TODO: Implement me! 56 return DERIVATIVE;
27 return null;
28 } 57 }
29 58
30 @Override 59 @Override
31 public Function getInverse() { 60 public Function getInverse() {
32 return LogLinear.INSTANCE; 61 return LogLinear.INSTANCE;

http://dive4elements.wald.intevation.org