about summary refs log tree commit diff
path: root/sourcecodes/bnt-master/netlab3.3/gpcovarp.m
blob: 203c405c72eba5da033f520c8d5cd82231e1d2ce (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
function [covp, covf] = gpcovarp(net, x1, x2)
%GPCOVARP Calculate the prior covariance for a Gaussian Process.
%
%	Description
%
%	COVP = GPCOVARP(NET, X1, X2) takes  a Gaussian Process data structure
%	NET together with two matrices X1 and X2 of input vectors,  and
%	computes the matrix of the prior covariance.  This is the function
%	component of the covariance plus the exponential of the bias term.
%
%	[COVP, COVF] = GPCOVARP(NET, X1, X2) also returns the function
%	component of the covariance.
%
%	See also
%	GP, GPCOVAR, GPCOVARF, GPERR, GPGRAD
%

%	Copyright (c) Ian T Nabney (1996-2001)

errstring = consist(net, 'gp', x1);
if ~isempty(errstring);
  error(errstring);
end

if size(x1, 2) ~= size(x2, 2)
  error('Number of variables in x1 and x2 must be the same');
end

covf = gpcovarf(net, x1, x2);
covp = covf + exp(net.bias);