wolffd@0: function [ output_args ] = gen_evaluate( data,label,WW,Classes)
wolffd@0: %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
wolffd@0: % generative classification                                          %   
wolffd@0: % WW = [W visB hidB]                                                 %
wolffd@0: % mW: mask of connections                                            %
wolffd@0: % -*-sontran2012-*-                                                  %
wolffd@0: %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
wolffd@0: %% Loading data & label
wolffd@0: assert(size(data,1) == size(label,1),'[KRBM-GEN] Number of data and label mismatch'); 
wolffd@0: lNum = size(Classes);
wolffd@0: %% Loading structure
wolffd@0: [total visNum]= size(data);
wolffd@0: sNum = 500;                                                              % fix
wolffd@0: bNum  = ceil(total/sNum);                                                % divide the testing samples to batches of sNum
wolffd@0: %% Classifying
wolffd@0: count = 0;
wolffd@0: for i=1:bNum
wolffd@0:     % Find the position of softmax unit which make lowest free energy
wolffd@0:     L = lowest_fenergy(data((i-1)*sNum + 1:i*sNum,:),WW,lNum,Classes);
wolffd@0:     count = count + sum(L==label((i-1)*sNum + 1:i*sNum));
wolffd@0: end
wolffd@0: L = lowest_fenergy(data(bNum*sNum + 1:total,:),WW,Classes);
wolffd@0: count = count + sum(L==label(bNum*sNum + 1:total));
wolffd@0: fprintf('Correct rate: %f (%d/%d)',count/total,count,total;
wolffd@0: clear A vars data lNum sNum bNum out;
wolffd@0: end
wolffd@0: