function getoneDegrees(FolderPath,OutPath)
%UNTITLED2 Summary of this function goes here
%  2011.10.20
h = waitbar(0,'Please wait...');
for rnum=1:90
FolderNamelist=dir(FolderPath);
[Fm Fn]=size(FolderNamelist);
for FolderNum=1:Fm
FolderName= FolderNamelist(FolderNum,1).name;
if FolderName ~= '.'
dataPath=strcat(FolderPath,'\',FolderName);
readlist=dir(strcat(dataPath,'\*.mat'));
[m n]=size(readlist);
 for i=1:m
        matName=readlist(i,1).name;
        matPath=strcat(dataPath,'\',matName);
       NetworkDegree = importdata(matPath);
       %[h l]=size(NetworkDegree);
       %if l==3
       %allDegrees(i,FolderNum-2)=NetworkDegree(rnum,3);
      % else if l==1
        allDegrees(i,FolderNum-2)=NetworkDegree(rnum,1);
        %   end
      % end
 end
 
end 

end
 display(rnum);
fileName=strcat('oneDegrees',num2str(rnum))
%save(strcat('D:\matlab current\onedegree','\',fileName),'allDegrees')
save(strcat(OutPath,'\',fileName),'allDegrees');
waitbar(rnum/90,h,'Please wait...',h);
end
close(h);
end

