MKSC_parc.m

function MKSC_parc(iK,iPart,iRep)
% Group level parcellation by MKSC.
% 2016-5-28 17:07:50

%     SLIC: a whole brain parcellation toolbox
%     Copyright (C) 2016 Jing Wang
%
%     This program is free software: you can redistribute it and/or modify
%     it under the terms of the GNU General Public License as published by
%     the Free Software Foundation, either version 3 of the License, or
%     (at your option) any later version.
%
%     This program is distributed in the hope that it will be useful,
%     but WITHOUT ANY WARRANTY; without even the implied warranty of
%     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
%     GNU General Public License for more details.
%
%     You should have received a copy of the GNU General Public License
%     along with this program.  If not, see <http://www.gnu.org/licenses/>.

tic;

load sK.mat;
load sSub.mat;
load parc_graymatter.mat;
load(sprintf('randset_%d.mat',iPart));

cK=sK(iK);
sSub=sSub(randset(:,iRep));
nSub=length(sSub);

for iSub=1:nSub
    cSub=sSub(iSub);
    load(sprintf('sub_eigen/sub%05d.mat',cSub)); % feature matrix
    X(:,:,iSub)=EV;
end

[LG,L]=Ncut_kway(X,cK); % parcellation results

% group level results----------------------
label=LG;

tmp=zeros(siz);
tmp(msk_gray)=label;
img_parc=tmp;
K=length(unique(label)); % actual cluster number

% save to .mat file
time=toc/3600;
save(sprintf('MKSC_parc/K%d_part%d_rep%d.mat',cK,iPart,iRep),'img_parc','K','time');
fprintf('Time to do group parcellation: %0.2f hours. \n',time);

% save to .nii file
file_mask='graymatter.nii';
file_out=sprintf('MKSC_parc/K%d_part%d_rep%d.nii',cK,iPart,iRep);
parc_nii(file_mask,file_out,img_parc);

% % individual level results---------------
% for iSub=1:nSub
%     cSub=sSub(iSub);
%     label=L(:,iSub);
%     
%     tmp=zeros(siz);
%     tmp(msk_gray)=label;
%     img_parc=tmp;
%     K=length(unique(label)); % actual cluster number
%     
%     % save to .mat file
%     % time=toc/3600;
%     save(sprintf('MKSC_parc/sub%d_K%d_part%d_rep%d.mat',cSub,cK,iPart,iRep),'img_parc','K','time');
%     % fprintf('Time to do group mean parcellation: %0.2f hours. \n',time);
%     
%     % save to .nii file
%     file_mask='graymatter.nii';
%     file_out=sprintf('MKSC_parc/sub%d_K%d_part%d_rep%d.nii',cSub,cK,iPart,iRep);
%     parc_nii(file_mask,file_out,img_parc);
% end