inverse_gamma_model.py 2.56 KB
Newer Older
Martin Reinecke's avatar
Martin Reinecke committed
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
# This program is free software: you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation, either version 3 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program.  If not, see <http://www.gnu.org/licenses/>.
#
# Copyright(C) 2013-2018 Max-Planck-Society
#
# NIFTy is being developed at the Max-Planck-Institut fuer Astrophysik
# and financially supported by the Studienstiftung des deutschen Volkes.

19
from __future__ import absolute_import, division, print_function
Philipp Arras's avatar
Philipp Arras committed
20

21
22
import numpy as np
from scipy.stats import invgamma, norm
Philipp Arras's avatar
Philipp Arras committed
23
24

from ..compat import *
Martin Reinecke's avatar
Martin Reinecke committed
25
26
from ..operators.operator import Operator
from ..linearization import Linearization
27
from ..field import Field
Philipp Arras's avatar
Philipp Arras committed
28
from ..sugar import makeOp
29
30


Martin Reinecke's avatar
Martin Reinecke committed
31
32
class InverseGammaModel(Operator):
    def __init__(self, domain, alpha, q):
Martin Reinecke's avatar
Martin Reinecke committed
33
        self._domain = self._target = domain
34
35
36
        self._alpha = alpha
        self._q = q

Martin Reinecke's avatar
Martin Reinecke committed
37
38
39
40
41
    def apply(self, x):
        lin = isinstance(x, Linearization)
        val = x.val.local_data if lin else x.local_data
        # MR FIXME?!
        points = np.clip(val, None, 8.2)
Martin Reinecke's avatar
Martin Reinecke committed
42
        points = invgamma.ppf(norm.cdf(points), self._alpha, scale=self._q)
Martin Reinecke's avatar
Martin Reinecke committed
43
44
45
46
47
        points = Field.from_local_data(self._domain, points)
        if not lin:
            return points
        inner = norm.pdf(val)
        outer_inv = invgamma.pdf(invgamma.ppf(norm.cdf(val),
48
49
50
                                              self._alpha,
                                              scale=self._q),
                                 self._alpha, scale=self._q)
51
52
        # FIXME
        outer_inv = np.clip(outer_inv, 1e-20, None)
53
        outer = 1/outer_inv
Martin Reinecke's avatar
Martin Reinecke committed
54
55
56
        jac = makeOp(Field.from_local_data(self._domain, inner*outer))
        jac = jac(x.jac)
        return Linearization(points, jac)
57

Martin Reinecke's avatar
Martin Reinecke committed
58
    @staticmethod
Philipp Arras's avatar
Philipp Arras committed
59
    def IG(field, alpha, q):
Martin Reinecke's avatar
Martin Reinecke committed
60
61
        foo = invgamma.ppf(norm.cdf(field.local_data), alpha, scale=q)
        return Field.from_local_data(field.domain, foo)
62

Martin Reinecke's avatar
Martin Reinecke committed
63
    @staticmethod
Philipp Arras's avatar
Philipp Arras committed
64
    def inverseIG(u, alpha, q):
Martin Reinecke's avatar
Martin Reinecke committed
65
66
        res = norm.ppf(invgamma.cdf(u.local_data, alpha, scale=q))
        return Field.from_local_data(u.domain, res)
Philipp Arras's avatar
Philipp Arras committed
67
68
69
70
71
72
73
74

    @property
    def alpha(self):
        return self._alpha

    @property
    def q(self):
        return self._q