% Filename::zscore&rmap.m
% extract the time course of each task block, normalize them within blcoks, then concatenate acorss blocks,;% finally,calculated the FC derived from the concatenated time courses..% NEED: redefine cd and create result file
clear;
cd ('G:\fMRIanalysis\Task2_GRETNA\GretnaTimeCourse');
subList=dir('Sub?_*.txt');%extract task_specific time course;%task point:1:12;21:32;41:52;%baseline :13:20;33:40;53:60;for i=1:41;
subTS=load(subList(i).name);
id1=3:14;% raw:1:12,shift 2 time point,about 5 secends .
task_course=subTS(id1,:);
timec_Z1=zscore(task_course);%normalize
id2=23:34;%raw:21:32
task_course=subTS(id2,:);
timec_Z2=zscore(task_course);
id3=43:54;%raw:41:52;
task_course=subTS(id3,:);
timec_Z3=zscore(task_course);%concatenate
timec_Z=[timec_Z1;timec_Z2;timec_Z3];%Pearson corr
FC_Z=corrcoef(timec_Z);
FC_Z = FC_Z -diag(diag(FC_Z));%Fisher r to z
zFC_Z =atanh(FC_Z);%output txt
dlmwrite(['G:\fMRIanalysis\Task2_GRETNA\BNormalise\BNormaliseMatrixR\r',subList(i).name],FC_Z,'delimiter','\t','precision','%-20.15e');dlmwrite(['G:\fMRIanalysis\Task2_GRETNA\BNormalise\BNormaliseMatrixZ\z',subList(i).name],zFC_Z,'delimiter','\t','precision','%-20.15e');
end
disp done