This commit is contained in:
mu 2014-01-14 08:43:06 +00:00
parent 1aa060439f
commit 4fe0583c7d

View file

@ -22,11 +22,11 @@ from GPy.util.plot import gpplot, Tango, x_frame1D
import pylab as pb import pylab as pb
class StateSpace_1(Model): class StateSpace_1(Model):
def __init__(self, Sp,X, Y, kernel=None): def __init__(self, SXP, SI, X, Y, kernel=None):
super(StateSpace_1, self).__init__() super(StateSpace_1, self).__init__()
self.num_data, input_dim = X.shape self.num_data, input_dim = X.shape
assert input_dim==1, "State space methods for time and space 2" assert input_dim==1, "State space methods for time and space 2"
num_data_Y, self.output_dim = Y.shape self.output_dim, num_data_Y = Y.shape
assert num_data_Y == self.num_data, "X and Y data don't match" assert num_data_Y == self.num_data, "X and Y data don't match"
#assert self.output_dim == 1, "State space methods for single outputs only" #assert self.output_dim == 1, "State space methods for single outputs only"
@ -35,6 +35,9 @@ class StateSpace_1(Model):
self.X = X[sort_index] self.X = X[sort_index]
self.Y = Y[sort_index] self.Y = Y[sort_index]
self.SXP = SXP
self.SI = SI
#sort_index = np.argsort(X[:,0]) #sort_index = np.argsort(X[:,0])
#self.X = X[sort_index] #self.X = X[sort_index]
#self.Y = Y[sort_index] #self.Y = Y[sort_index]
@ -44,8 +47,8 @@ class StateSpace_1(Model):
# Default kernel # Default kernel
if kernel is None: if kernel is None:
self.kern = kern.Matern32(1) self.kern = kern.Matern32(1,lengthscale=0.3)
self.spacekern = kern.rbf(1) self.spacekern = kern.rbf(1,lengthscale=0.3)
else: else:
self.kern = kernel self.kern = kernel
@ -88,8 +91,8 @@ class StateSpace_1(Model):
# Use the Kalman filter to evaluate the likelihood # Use the Kalman filter to evaluate the likelihood
return self.kf_likelihood(F,L,Qc,H,self.sigma2,Pinf,self.X.T,self.Y.T) #return self.kf_likelihood(F,L,Qc,H,self.sigma2,Pinf,self.X.T,self.Y.T)
#return self.kf_likelihood(F1,L1,Qc1,H1,self.sigma2,Pinf1,self.X.T,self.Y.T) return self.kf_likelihood(F1,L1,Qc1,H1,self.sigma2,Pinf1,self.X.T,self.Y.T)
def _log_likelihood_gradients(self): def _log_likelihood_gradients(self):
@ -108,6 +111,8 @@ class StateSpace_1(Model):
#Y = np.vstack((self.Y, np.nan*np.zeros(Xnew.shape))) #Y = np.vstack((self.Y, np.nan*np.zeros(Xnew.shape)))
X=self.X X=self.X
Y=self.Y Y=self.Y
SXP=self.SXP
SI=self.SI
# Sort the matrix (save the order) # Sort the matrix (save the order)
_, return_index, return_inverse = np.unique(X,True,True) _, return_index, return_inverse = np.unique(X,True,True)
@ -117,27 +122,51 @@ class StateSpace_1(Model):
# Get the model matrices from the kernel # Get the model matrices from the kernel
(F,L,Qc,H,Pinf) = self.kern.sde() (F,L,Qc,H,Pinf) = self.kern.sde()
n=X.shape[0] n=SXP.shape[0]
F1 = np.kron(np.eye(n),F) F1 = np.kron(np.eye(n),F)
L1 = np.kron(np.eye(n),L) L1 = np.kron(np.eye(n),L)
K1=self.spacekern.K(X) K1=self.spacekern.K(SXP)
Qc1 = K1*Qc #kron(K,Qc1); Qc1 = K1*Qc #kron(K,Qc1);
H1 = np.kron(np.eye(n),H) H2 = np.zeros([len(SI),SXP.shape[0]])
count = 0
for index in SI:
H2[count,index] = 1
count = count+1
# H1 = np.kron(np.eye(n),H)
H1 = np.kron(H2,H)
Pinf1 = np.kron(K1,Pinf) Pinf1 = np.kron(K1,Pinf)
# Run the Kalman filter # Run the Kalman filter
#(M, P) = self.kalman_filter(F,L,Qc,H,self.sigma2,Pinf,X.T,Y.T) #(M, P) = self.kalman_filter(F,L,Qc,H,self.sigma2,Pinf,X.T,Y.T)
(M, P) = self.kalman_filter(F1,L1,Qc1,H1,self.sigma2,Pinf1,X.T,Y) #(M, P) = self.kalman_filter(F1,L1,Qc1,H1,self.sigma2,Pinf1,X.T,Y)
NY = np.zeros([Y.shape[0],Xnew.shape[0]+X.shape[0]]) * np.nan
NX = np.zeros([Xnew.shape[0] + X.shape[0],1])
# Assume that Xmax is ordered !!!
oi = 0
ni = 0
xni = 0
for xni in range(Xnew.shape[0]):
if oi < X.shape[0]:
if (xni == 0 and X[oi] < Xnew[xni]) or (xni > 0 and X[oi] >= Xnew[xni-1] and X[oi] < Xnew[xni]):
NY[:,ni] = Y[:,oi]
NX[ni] = X[oi]
ni = ni + 1
oi = oi + 1
NX[ni] = Xnew[xni]
ni = ni + 1
count = count+1
(M, P) = self.kalman_filter(F1,L1,Qc1,H1,self.sigma2,Pinf1,NX.T,NY)
#stop
# Run the Rauch-Tung-Striebel smoother # Run the Rauch-Tung-Striebel smoother
#if not filter: #if not filter:
#(M, P) = self.rts_smoother(F,L,Qc,X.T,M,P) #(M, P) = self.rts_smoother(F,L,Qc,X.T,M,P)
#(M, P) = self.rts_smoother(F1,L1,Qc1,X.T,M,P) (M, P) = self.rts_smoother(F1,L1,Qc1,NX.T,M,P)
# Put the data back in the original order # Put the data back in the original order
M = M[:,return_inverse] #M = M[:,return_inverse] # Do not use with Xnew
P = P[:,:,return_inverse] #P = P[:,:,return_inverse]
# Only return the values for Xnew # Only return the values for Xnew
#M = M[:,self.num_data:] #M = M[:,self.num_data:]
@ -145,7 +174,12 @@ class StateSpace_1(Model):
# Calculate the mean and variance # Calculate the mean and variance
#m = H.dot(M).T #m = H.dot(M).T
m = H1.dot(M) #m = H1.dot(M)
n=SXP.shape[0]
H3 = np.kron(np.eye(n),H)
m = H3.dot(M)
#V1 = np.tensordot(H[0],P,(0,0)) #V1 = np.tensordot(H[0],P,(0,0))
#V2 = np.tensordot(V1,H[0],(0,0)) #V2 = np.tensordot(V1,H[0],(0,0))
@ -188,7 +222,7 @@ class StateSpace_1(Model):
resolution = resolution or 200 resolution = resolution or 200
Xgrid, xmin, xmax = x_frame1D(self.X, plot_limits=plot_limits) Xgrid, xmin, xmax = x_frame1D(self.X, plot_limits=plot_limits)
# T grid??? # T grid???
#stop
# Make a prediction on the frame and plot it # Make a prediction on the frame and plot it
if plot_raw: if plot_raw:
@ -312,24 +346,21 @@ class StateSpace_1(Model):
PF[:,:,k] = A.dot(PF[:,:,k-1]).dot(A.T) + Q PF[:,:,k] = A.dot(PF[:,:,k-1]).dot(A.T) + Q
# Update step (only if there is data) # Update step (only if there is data)
#if not np.isnan(Y[:,k]): if not np.isnan(Y[0,k]):
# if Y.shape[0]==1: if Y.shape[0]==1:
# K = PF[:,:,k].dot(H.T)/(H.dot(PF[:,:,k]).dot(H.T) + R) K = PF[:,:,k].dot(H.T)/(H.dot(PF[:,:,k]).dot(H.T) + R)
# else: else:
# LL = linalg.cho_factor(H.dot(PF[:,:,k]).dot(H.T) + R) LL = linalg.cho_factor(H.dot(PF[:,:,k]).dot(H.T) + R*np.eye(Y.shape[0]))
# K = linalg.cho_solve(LL, H.dot(PF[:,:,k].T)).T
# stop
# MF[:,k] += K.dot(Y[:,k]-H.dot(MF[:,k]))
# PF[:,:,k] -= K.dot(H).dot(PF[:,:,k])
#if not np.isnan(Y[:,k]):
LL = linalg.cho_factor(H.dot(PF[:,:,k]).dot(H.T) + R*np.eye(Y.shape[1]))
K = linalg.cho_solve(LL, H.dot(PF[:,:,k].T)).T K = linalg.cho_solve(LL, H.dot(PF[:,:,k].T)).T
MF[:,k] += K.dot(Y[:,k]-H.dot(MF[:,k])) MF[:,k] += K.dot(Y[:,k]-H.dot(MF[:,k]))
PF[:,:,k] -= K.dot(H).dot(PF[:,:,k]) PF[:,:,k] -= K.dot(H).dot(PF[:,:,k])
# LL = linalg.cho_factor(H.dot(PF[:,:,k]).dot(H.T) + R*np.eye(Y.shape[1]))
# K = linalg.cho_solve(LL, H.dot(PF[:,:,k].T)).T
# MF[:,k] += K.dot(Y[:,k]-H.dot(MF[:,k]))
# PF[:,:,k] -= K.dot(H).dot(PF[:,:,k])
# Return values # Return values
return (MF, PF) return (MF, PF)
@ -345,6 +376,8 @@ class StateSpace_1(Model):
# Solve the LTI SDE for these time steps # Solve the LTI SDE for these time steps
As, Qs, index = self.lti_disc(F,L,Qc,dt) As, Qs, index = self.lti_disc(F,L,Qc,dt)
try:
# Sequentially smooth states starting from the end # Sequentially smooth states starting from the end
for k in range(2,X.shape[1]+1): for k in range(2,X.shape[1]+1):
@ -359,6 +392,9 @@ class StateSpace_1(Model):
MS[:,-k] += G.dot(MS[:,1-k]-A.dot(MS[:,-k])) MS[:,-k] += G.dot(MS[:,1-k]-A.dot(MS[:,-k]))
PS[:,:,-k] += G.dot(PS[:,:,1-k]-A.dot(PS[:,:,-k]).dot(A.T)-Q).dot(G.T) PS[:,:,-k] += G.dot(PS[:,:,1-k]-A.dot(PS[:,:,-k]).dot(A.T)-Q).dot(G.T)
except linalg.LinAlgError:
"""numerical"""
# Return # Return
return (MS, PS) return (MS, PS)
@ -391,25 +427,37 @@ class StateSpace_1(Model):
P = A.dot(P).dot(A.T) + Q P = A.dot(P).dot(A.T) + Q
# Update step only if there is data # Update step only if there is data
if not np.isnan(Y[:,k]): if not np.isnan(Y[0,k]):
v = Y[:,k]-H.dot(m)
if Y.shape[0]==1: if Y.shape[0]==1:
v = Y[:,k]-H.dot(m)
S = H.dot(P).dot(H.T) + R S = H.dot(P).dot(H.T) + R
K = P.dot(H.T)/S K = P.dot(H.T)/S
lik -= 0.5*np.log(S) lik -= 0.5*np.log(S)
lik -= 0.5*v.shape[0]*np.log(2*np.pi) lik -= 0.5*v.shape[0]*np.log(2*np.pi)
lik -= 0.5*v*v/S lik -= 0.5*(v*v/S)[0,0] # !!!
else: else:
LL, isupper = linalg.cho_factor(H.dot(P).dot(H.T) + R) v = Y[:,k][None].T-H.dot(m)
LL, isupper = linalg.cho_factor(H.dot(P).dot(H.T) + R*np.eye(Y.shape[1]))
K = linalg.cho_solve((LL, isupper), H.dot(P)).T
lik -= np.sum(np.log(np.diag(LL))) lik -= np.sum(np.log(np.diag(LL)))
lik -= 0.5*v.shape[0]*np.log(2*np.pi) lik -= 0.5*v.shape[0]*np.log(2*np.pi)
lik -= 0.5*linalg.cho_solve((LL, isupper),v).dot(v) lik -= 0.5*linalg.cho_solve((LL, isupper),v).T.dot(v)[0,0]
K = linalg.cho_solve((LL, isupper), H.dot(P.T)).T
m += K.dot(v) m += K.dot(v)
P -= K.dot(H).dot(P) P -= K.dot(H).dot(P)
#stop
# v = Y[:,k][None].T-H.dot(m)
# LL, isupper = linalg.cho_factor(H.dot(P).dot(H.T) + R*np.eye(Y.shape[1]))
# K = linalg.cho_solve((LL, isupper), H.dot(P)).T
# lik -= np.sum(np.log(np.diag(LL)))
# lik -= 0.5*v.shape[0]*np.log(2*np.pi)
# lik -= 0.5*linalg.cho_solve((LL, isupper),v).T.dot(v)[0,0]
# m += K.dot(v)
# P -= K.dot(H).dot(P)
# Return likelihood # Return likelihood
return lik[0,0] return lik
def simulate(self,F,L,Qc,Pinf,X): def simulate(self,F,L,Qc,Pinf,X):
# Simulate a trajectory using the state space model # Simulate a trajectory using the state space model