Rhythms/plotIBsynSpike.m at master · alexgelas/Rhythms · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
calcSpikes;

amps=100;
stepsPlot=size(fullMAR,2);

plotStart=-30; % in ms
plotEnd=100;

xaxis=(plotStart:dt:plotEnd);

numPlotSteps=length(xaxis);

numBursts=length(burstTimes);

colorCode=true;

synIndex=find(preSyn==IBaxon & postSyn==IBbasal);

h=figure(41);
clf
hold on
skip=5;
for bb=skip+1:numBursts-3
    if colorCode
        switch burstsAxon(round(burstTimes(bb)/dt+0.01))
            case 2
                tempColor='blue';
            case 3
                tempColor='red';
            case 4
                tempColor='black';
            otherwise
                tempColor='green';
        end
    else
        tempColor='black';
    end
    startTime=floor((burstTimes(bb)+plotStart)/dt);
    plot(xaxis,fullSynapses(synIndex,startTime+1:startTime+numPlotSteps),'color',tempColor);
end
hold off

ax=gca;
ax.FontSize=20;
ax.FontWeight='bold';
ax.Title.String='IB axon -> basal dendrite synapse';
ax.XLabel.String='Time from burst initiation (ms)';
ax.YLabel.String='Synapse variable value';

if nameSuffix
    filepath=strcat('IBsyn-',nameSuffix);
else
    filepath=strcat('IBsyn');
end
saveFig(folder,filepath,h)