%S=shaperead('D:\D drive\mammaldata\MAMMTERR.shp'); clear ZR = zeros(180,360); Za = zeros(180,360); RR = [1 90 -180]; n=1; load('diseasefirstz.mat') for i = 1:length(rangered) ix = find(strcmpi(rangered(i), splist)==1); if ~isempty(ix)==1 [Z, R] = vec2mtx(LAT{ix}, LON{ix}, ZR, RR, 'filled'); Z=flipud(Z); Z(Z==0)=1; Z(Z==2) = 0; imagesc(Z) pause(.1) Z=flipud(Z); Z(Z==0)=1; Z(Z==2) = 0; % if (strcmpi(spname, name(n-1))==1) % %name(n) = {spname}; % Za = Za+Z; % % else namez(n) = {splist(ix)}; Za1(:,:,n) = Z; Za2(:,:,n) = Za; Za = zeros(180,360); n=n+1; %end end end