function [m]=my_smearspikes(spikes,stimulatednode) %Smear spikes simlength=length(spikes); i=stimulatednode; for j=1:simlength lim_low=j; if lim_low<1 limlow=1; end lim_high=j+10; if lim_high>simlength lim_high=simlength; end if spikes(j,i)==1 spikes(lim_low:lim_high,i)=1; end end [m]=spikes;