0001 function chpair_list = chpairindex_2chpair(pairindex); 0002 ch_pair_indices; 0003 for i =1:size(pairindex,2) 0004 [chpair_list1, chpair_list2] = find(chpair == pairindex(i)); 0005 chpair_list(i,1:2) = [chpair_list1(1) chpair_list2(1)]; 0006 end; 0007 %icount = 1; 0008 %for i = 1:size(chpair_list1,1) 0009 % if chpair_list1(i) < chpair_list2(i) 0010 % chpair_list(icount,1:2) = [chpair_list1(icount) chpair_list2(icount)]; 0011 % icount = icount + 1; 0012 % end; 0013 %end; 0014 %size(chpair_list,1) 0015 %size(pairindex,2) 0016 if size(chpair_list,1) ~= size(pairindex,2) 0017 error('houston we have a problem') 0018 end; 0019