Christoph Budziszewski
removed unused functions
Christoph Budziszewski commited 6267882 at 2009-07-31 10:29:51
%function pst = calculatePST(timeline,pstopts,data)
function pst = calculatePST(timeline,pstopts,data)
%function pst = calculatePST(des,globalStart,baselineStart,baselineEnd,globalEnd,eventList,data,sessionList)
des = pstopts.des;
eventList = pstopts.eventList;
sessionList = pstopts.sessionList;
col_bias_removal = pstopts.colBias;
norm4SVM = pstopts.psthNorm; %Normalization method for SVM
bstart = timeline.baselineStart;
bend = timeline.baselineEnd;
edur = 12;
pre = timeline.psthStart;
post = timeline.psthEnd;
tr = timeline.tr;
res = tr * timeline.trFactor;
normz = 'file';
pm = 0;
lsess = getNumberOfScans(des);
nSessions = getNumberOfSessions(des);
[evntrow evntcol]=size(eventList);
hsec=str2num(des.xsDes.High_pass_Filter(8:end-3)); % Highpass filter [sec] from SPM.mat
if strcmp(des.xBF.UNITS,'secs')
unitsecs=1;
end;
nScansPerSession=getNumberOfScans(des);
%stime=[0:tr:max(nScansPerSession)*tr+post-tr]; % Stimulus time for raw data plot
stime=0:tr:max(nScansPerSession)*tr+round(post/tr)*tr-tr; % Stimulus time for raw data plot
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% RUN
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% Digital Highpass
Rp=0.5;
Rs=20;
NO=1;
Wp=1/((1/2/tr)/(1/hsec));
[B, A] = ellip(NO,Rp,Rs,Wp,'high');
sdata(1:max(nScansPerSession)+round(post/tr),1:nSessions)=nan; % Open Data Matrix
 
 
הההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההה
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX