Files
matlab/RBM/jwrite_retina.asv
T
jens 7b34529b24 imported RBM
git-svn-id: http://moon:8086/svn/matlab/trunk@91 801c6759-fa7c-4059-a304-17956f83a07c
2016-07-12 11:24:12 +00:00

14 lines
412 B
Plaintext

function jwrite_retina(fid, data, nx, ny)
numPixel = length(data);
fprintf(fid, '%d\n', numPixel);
im0 = reshape(data(m,:), nx, ny)';
imwrite(im0, ['mnist_' num2str(label) '_' num2str(m) '.tif']);
[im_on, im_off] = retina(im0, 7, 0.3);
imwrite(0.5*(im_on - im_off) + 0.5, ['mnist_retina_' num2str(label) '_' num2str(m) '.tif']);
for n=1:numPixel,
fprintf(fid, '%f\n', data(n));
end