function K=gha_dispwe(W,j)% function K=gha_dispwe(W,j)%%  - displays 8 * 64 matrix as 8 blocks in a 4 by 2 image%  - used for visualizing principal components resulting from GHA%  - if nargin > 1, the weights are scaled to fit the range 0 -> j%% Hugh Pasika 1997if nargin > 1, W=W-(min(min(W))); W=W/max(max(W))*j; endK=zeros(32,16);for k=1:4,   for j=1:2,      K((k-1)*8+1:k*8,(j-1)*8+1:j*8)=reshape(W(:,(k-1)*2+j),8,8);   endendpim(K)