1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44
| clear all
[numericData, textData, rawData]=xlsread('C:\Users\Hend\Desktop\Rendement banque.xls');
Islamicdata=rawData;
DateBK=Islamicdata(2:size(Islamicdata,1),1);
NameBk= rawData(1,2:size(Islamicdata,2));
RmentBque=numericData(1:size(numericData,1),2:size(numericData,2));
date=numericData(1:size(numericData,1),1);
%%%%%%%%%%%%%%%%%%%
for j= 1: size(RmentBque,2)
Where_NaN= isnan(RmentBque(:,j));
for i= 1:length(RmentBque)
if Where_NaN (i)== 1
R_W_bk(i,j) = 0;
else R_W_bk(i,j) = RmentBque(i,j);
end
end
end
%%%%%%%%%%%%%%%%%%
fileNameBq = input ('save as: ', 's');
N=size(R_W_bk,2);
T=size(R_W_bk,1);
X_i= zeros(52,N);
D = zeros (52 , 1);
for i = 1T-51)
X_i= R_W_bk (i:i+51, ;
D = date ( i:i+51, 1);
B= datestr(D,'dd-mm-yy');
C=cellstr(B);
a =D(1,1);
b = D(52,1);
sheet=['from ' datestr(a,'dd-mm-yy') ' to ' datestr(b,'dd-mm-yy')];
xlswrite(fileNameBq , NameBk, sheet, 'B1');
xlswrite(fileNameBq , C, sheet, 'A2');
xlswrite(fileNameBq , X_i, sheet, 'B2');
end |
Partager