rbfnetwork.m.txt

来自「use in the matlab NN network RBF network」· 文本 代码 · 共 44 行

% Two images
image1 = teachimage('moffat.bmp');
image2 = teachimage('vcr.bmp');

% Preprocessing
filt = fspecial('log', 11, 2);
cc1 = conv2(image1, filt, 'valid');
cc2 = conv2(image2, filt, 'valid');

% Samping parameters
hsize = 10;   % the patches sampled are 41 x 41 pixels
nsamp = 50;  % extract 100 samples for training

% Get samples
p1 = imsample(cc1, hsize, nsamp);
p2 = imsample(cc2, hsize, nsamp);
[len, nsamp] = size(p1);         % get size of p conveniently

p = [p1 p2];

% Get targets
t1 = -ones(1, nsamp);
t2 = ones(1, nsamp);

t = [t1 t2];

% Create and train rbf network
spread = 1;
net = newrbe(p, t, spread);

% Test on new samples

p1 = imsample(cc1, hsize, nsamp);
p2 = imsample(cc2, hsize, nsamp);

y1 = sim(net, p1);
y2 = sim(net, p2);

figure;
hist(y1, -5:0.5:5);
figure;
hist(y2, -5:0.5:5);