inhom.m

% inhom.m  8/27/20

clear
format compact
hh = newcolormap('heated');

pat(1) = {'hov5'};        patcoc(1) = 1;    patreg(1) = {'CT'};   % S    
pat(2) = {'hov7'};        patcoc(2) = -1;    patreg(2) = {'clear'};    % S clear cell         
pat(3) = {'hov8'};        patcoc(3) = -1;    patreg(3) = {'CT'};    % R         
pat(4) = {'hov8b'};       patcoc(4) = -1;    patreg(4) = {'met'};    % met 8         
pat(5) = {'hov9'};        patcoc(5) = 1;    patreg(5) = {'met'};     % met        
pat(6) = {'hov10'};       patcoc(6) = 1;    patreg(6) = {'CT'};     % S      
pat(7) = {'hov11'};       patcoc(7) = 1;    patreg(7) = {'met'};     % met       
pat(8) = {'hov12'};       patcoc(8) = 1;    patreg(8) = {'met'};     % met        
pat(9) = {'hov13'};       patcoc(9) = 1;    patreg(9) = {'CT'};     % S    
pat(10) = {'hov14'};      patcoc(10) = -1;    patreg(10) = {'clear'};   % R      
pat(11) = {'hov15'};      patcoc(11) = 1;    patreg(11) = {'CT'};    % S      
pat(12) = {'hov16'};      patcoc(12) = -1;    patreg(12) = {'CT'};   % R         
pat(13) = {'hov17'};      patcoc(13) = -1;    patreg(13) = {'CT'};   % R     
pat(14) = {'hov18a'};     patcoc(14) = 1;    patreg(14) = {'CT'};    % S       
pat(15) = {'hov18b'};     patcoc(15) = 1;    patreg(15) = {'met'};    % met 18    
pat(16) = {'hov20'};      patcoc(16) = 1;    patreg(16) = {'CT'};    % S
pat(17) = {'hov20b'};     patcoc(17) = 1;    patreg(17) = {'met'};    % met 20      
pat(18) = {'hov22'};      patcoc(18) = 1;    patreg(18) = {'CT'};    % S         
pat(19) = {'hov23'};      patcoc(19) = 1;    patreg(19) = {'CT'};    % S       
pat(20) = {'hov25'};      patcoc(20) = 1;    patreg(20) = {'CT'};    % S        
pat(21) = {'hov26'};      patcoc(21) = 1;    patreg(21) = {'met'};    % met      
pat(22) = {'hov30'};      patcoc(22) = 1;    patreg(22) = {'CT'};    % S
pat(23) = {'hov31'};      patcoc(23) = 1;    patreg(23) = {'CT'};    % S

Delsum = zeros(13,130);
for loop = 1:23
    
    filnam = strcat('/ABCs/Apps/OCI/HOV/dbOutHOV/SOut',char(pat(loop)),'dmso.mat');
    load(filnam)
    
    Delsum = Delsum + Del/23;
    
    
end

figure(1)
colormap(jet)
subplot(2,2,1),imagesc(Delsum)
caxis([0 0.6])
title('Average Del')

load('/ABCs/Apps/OCI/HOV/dbOutHOV/SOutClass1dmso.mat')
colormap(jet)
subplot(2,2,2),imagesc(Del)
caxis([0 0.6])
title('RClass DMSO')

load('/ABCs/Apps/OCI/HOV/dbOutHOV/SOutClass2dmso.mat')
colormap(jet)
subplot(2,2,4),imagesc(Del)
caxis([0 0.6])
title('SClass DMSO')

load('/ABCs/Apps/OCI/HOV/dbOutHOV/SOutdmso.mat')
colormap(jet)
subplot(2,2,3),imagesc(Del)
caxis([0 0.6])
title('DMSO')


h = figure(2);
h.Position = [482 139 854 698];
dum = set(h);
colormap(jet)
subplot(2,2,1),pcolor(Delsum),shading interp,colorbar
caxis([0 0.6])
title('Average Del')

load('/ABCs/Apps/OCI/HOV/dbOutHOV/SOutClass1dmso.mat')
colormap(jet)
subplot(2,2,2),pcolor(Del),shading interp,colorbar
caxis([0 0.6])
title('RClass DMSO')

load('/ABCs/Apps/OCI/HOV/dbOutHOV/SOutClass2dmso.mat')
colormap(jet)
subplot(2,2,4),pcolor(Del),shading interp,colorbar
caxis([0 0.6])
title('SClass DMSO')

load('/ABCs/Apps/OCI/HOV/dbOutHOV/SOutdmso.mat')
colormap(jet)
subplot(2,2,3),pcolor(Del),shading interp,colorbar
caxis([0 0.6])
title('DMSO')

set(gcf,'Color','white')