% subject A
% import .csv files as tables; rename to acupoint names
     
%LineWidth=0.1;
set(groot,'defaultLineLineWidth',1)

subplot(2,2,1);
plot(st36.TimeD,st36.rST36,'DisplayName','ST36');
hold on;

axis([8 22 3 11])
xlabel('Time of day (hours)') 
ylabel('Impedance @5KHz (K\Omega)')

yyaxis right
plot(st36.TimeD,st36.gradient,'-.','DisplayName','gradient');
axis([8 22 0 800])
% plot(st36c.TimeD,st36c.gradient,':','DisplayName','gradient ctrl');

ylabel('Gradient (\Omega/mm)')
legend('show', 'Location', 'northwest')
title('Figure 1. Skin impedance at right ST-36')
grid

c=[0.41 0.72 0.92];
yyaxis left
plot(st36c.TimeD,st36c.rST36ctrl,'--','Color', c, 'DisplayName','ST36ctrl');


subplot(2,2,3);
plot(st37.TimeD,st37.rST37,'-','DisplayName','ST37');
hold on;

axis([8 22 3 11])
xlabel('Time of day (hours)') 
ylabel('Impedance @5KHz (K\Omega)')

yyaxis right
plot(st37.TimeD,st37.gradient,'-.','DisplayName','gradient');
axis([8 22 0 800])
ylabel('Gradient (\Omega/mm)')
legend('show', 'Location','northwest')
title('Figure 2. Skin impedance at right ST-37')
grid

yyaxis left
plot(st37c.TimeD,st37c.rST37ctrl,'--','Color', c, 'DisplayName','ST37ctrl');

subplot(2,2,4);
plot(gb34.TimeD,gb34.rGB34,'-','DisplayName','GB34');
hold on;
axis([8 22 3 11])
xlabel('Time of day (hours)') 
ylabel('Impedance @5KHz (K\Omega)')

yyaxis right
plot(gb34.TimeD,gb34.gradient,'-.','DisplayName','gradient');
axis([8 22 0 800])
ylabel('Gradient (\Omega/mm)')
legend('show', 'Location','northwest')
title('Figure 4. Skin impedance at right GB-34')
grid

yyaxis left
plot(gb34c.TimeD,gb34c.rGB34ctrl,'--','Color',c,'DisplayName','GB34ctrl');


subplot(2,2,2);
plot(st39.TimeD,st39.rST39,'-','DisplayName','ST39');
hold on;
axis([8 22 3 11])
xlabel('Time of day (hours)') 
ylabel('Impedance @5KHz (K\Omega)')

yyaxis right
plot(st39.TimeD,st39.gradient,'-.','DisplayName','gradient');
axis([8 22 0 800])
ylabel('Gradient (\Omega/mm)')
legend('show', 'Location','northwest')
title('Figure 3. Skin impedance at right ST-39')
grid

yyaxis left
plot(st39c.TimeD,st39c.rST39ctrl,'--','Color',c,'DisplayName','ST39ctrl');
