Fixed bug + Cosmetic changes.
parent
be57a4b0be
commit
cefbf45a9c
|
@ -50,35 +50,35 @@ A.vobs=length(A.name);
|
||||||
|
|
||||||
if B.init >= C.init
|
if B.init >= C.init
|
||||||
diff = B.init - C.init;
|
diff = B.init - C.init;
|
||||||
A.nobs = max(B.nobs + diff, C.nobs);
|
A.nobs = max(B.nobs + diff, C.nobs);
|
||||||
A.data = NaN(A.nobs, A.vobs);
|
A.data = NaN(A.nobs, A.vobs);
|
||||||
Z1 = [NaN(diff,B.vobs);B.data];
|
Z1 = [NaN(diff,B.vobs);B.data];
|
||||||
if A.nobs > B.nobs + diff
|
if A.nobs > B.nobs + diff
|
||||||
Z1 = [Z1;NaN(A.nobs-(B.nobs + diff),B.vobs)];
|
Z1 = [Z1; NaN(A.nobs-(B.nobs + diff),B.vobs)];
|
||||||
end;
|
end;
|
||||||
Z2 = C.data;
|
Z2 = C.data;
|
||||||
if A.nobs > C.nobs
|
if A.nobs > C.nobs
|
||||||
Z2 = [Z2;NaN(A.nobs - C.nobs,C.vobs)];
|
Z2 = [Z2; NaN(A.nobs - C.nobs,C.vobs)];
|
||||||
end;
|
end;
|
||||||
Z = [Z1 Z2];
|
Z = [Z1 Z2];
|
||||||
A.data = Z(:,IA);
|
A.data = Z(:,IA);
|
||||||
A.init = C.init;
|
A.init = C.init;
|
||||||
else
|
else
|
||||||
diff = C.init - B.init;
|
diff = C.init - B.init;
|
||||||
A.nobs = max(C.nobs + diff, B.nobs);
|
A.nobs = max(C.nobs + diff, B.nobs);
|
||||||
A.data = NaN(A.nobs, A.vobs);
|
A.data = NaN(A.nobs, A.vobs);
|
||||||
Z1 = [NaN(diff,C.vobs);C.data];
|
Z1 = [NaN(diff,C.vobs);C.data];
|
||||||
if A.nobs > C.nobs + diff
|
if A.nobs > C.nobs + diff
|
||||||
Z1 = [Z1;NaN(A.nobs-(C.nobs + diff),C.vobs)];
|
Z1 = [Z1; NaN(A.nobs-(C.nobs + diff),C.vobs)];
|
||||||
end;
|
end;
|
||||||
Z2 = B.data;
|
Z2 = B.data;
|
||||||
if A.nobs > B.nobs
|
if A.nobs > B.nobs
|
||||||
Z2 = [Z2;NaN(A.nobs - B.nobs,B.vobs)];
|
Z2 = [Z2; NaN(A.nobs - B.nobs,B.vobs)];
|
||||||
end;
|
end;
|
||||||
Z = [Z1 Z2];
|
Z = [Z2 Z1];
|
||||||
A.data = Z(:,IA);
|
A.data = Z(:,IA);
|
||||||
A.init = B.init;
|
A.init = B.init;
|
||||||
end;
|
end
|
||||||
|
|
||||||
%@test:1
|
%@test:1
|
||||||
%$ % Define a datasets.
|
%$ % Define a datasets.
|
||||||
|
|
Loading…
Reference in New Issue