Added unitary tests.
parent
1fce665e31
commit
6db5ba51cb
|
@ -568,3 +568,127 @@ end
|
|||
%$ end
|
||||
%$ T = all(t);
|
||||
%@eof:14
|
||||
|
||||
%@test:15
|
||||
%$ % Define a datasets.
|
||||
%$ A = rand(40,3); B = rand(40,1);
|
||||
%$
|
||||
%$ % Instantiate two dynSeries object.
|
||||
%$ ts1 = dynSeries(A,'1950Q1',{'A1';'A2';'A3'},[]);
|
||||
%$ ts2 = dynSeries(B,'1950Q1',{'B1'},[]);
|
||||
%$
|
||||
%$ % modify first object.
|
||||
%$ try
|
||||
%$ d1 = dynDate('1950Q3');
|
||||
%$ d2 = dynDate('1951Q3');
|
||||
%$ rg = d1:d2;
|
||||
%$ ts1.A1(rg) = sqrt(pi);
|
||||
%$ t(1) = 1;
|
||||
%$ catch
|
||||
%$ t(1) = 0;
|
||||
%$ end
|
||||
%$
|
||||
%$ % Instantiate a time series object.
|
||||
%$ if t(1)
|
||||
%$ t(2) = dyn_assert(ts1.vobs,3);
|
||||
%$ t(3) = dyn_assert(ts1.nobs,40);
|
||||
%$ t(4) = dyn_assert(ts1.name{2},'A2');
|
||||
%$ t(5) = dyn_assert(ts1.name{1},'A1');
|
||||
%$ t(6) = dyn_assert(ts1.name{3},'A3');
|
||||
%$ t(7) = dyn_assert(ts1.data,[[A(1:2,1); repmat(sqrt(pi),5,1); A(8:end,1)], A(:,2:3)],1e-15);
|
||||
%$ end
|
||||
%$ T = all(t);
|
||||
%@eof:15
|
||||
|
||||
%@test:16
|
||||
%$ % Define a datasets.
|
||||
%$ A = rand(40,3); B = rand(40,1);
|
||||
%$
|
||||
%$ % Instantiate two dynSeries object.
|
||||
%$ ts1 = dynSeries(A,'1950Q1',{'A1';'A2';'A3'},[]);
|
||||
%$ ts2 = dynSeries(B,'1950Q1',{'B1'},[]);
|
||||
%$
|
||||
%$ % modify first object.
|
||||
%$ try
|
||||
%$ d1 = dynDate('1950Q3');
|
||||
%$ d2 = dynDate('1951Q3');
|
||||
%$ rg = d1:d2;
|
||||
%$ ts1{'A1','A2'}(rg) = sqrt(pi);
|
||||
%$ t(1) = 1;
|
||||
%$ catch
|
||||
%$ t(1) = 0;
|
||||
%$ end
|
||||
%$
|
||||
%$ % Instantiate a time series object.
|
||||
%$ if t(1)
|
||||
%$ t(2) = dyn_assert(ts1.vobs,3);
|
||||
%$ t(3) = dyn_assert(ts1.nobs,40);
|
||||
%$ t(4) = dyn_assert(ts1.name{2},'A2');
|
||||
%$ t(5) = dyn_assert(ts1.name{1},'A1');
|
||||
%$ t(6) = dyn_assert(ts1.name{3},'A3');
|
||||
%$ t(7) = dyn_assert(ts1.data,[[A(1:2,1); repmat(sqrt(pi),5,1); A(8:end,1)], [A(1:2,2); repmat(sqrt(pi),5,1); A(8:end,2)], A(:,3)],1e-15);
|
||||
%$ end
|
||||
%$ T = all(t);
|
||||
%@eof:16
|
||||
|
||||
%@test:17
|
||||
%$ % Define a datasets.
|
||||
%$ A = rand(40,3); B = rand(40,1);
|
||||
%$
|
||||
%$ % Instantiate two dynSeries object.
|
||||
%$ ts1 = dynSeries(A,'1950Q1',{'A1';'A2';'A3'},[]);
|
||||
%$ ts2 = dynSeries(B,'1950Q1',{'B1'},[]);
|
||||
%$
|
||||
%$ % modify first object.
|
||||
%$ try
|
||||
%$ d1 = dynDate('1950Q3');
|
||||
%$ d2 = dynDate('1951Q3');
|
||||
%$ rg = d1:d2;
|
||||
%$ ts1{'A1','A2'}(rg) = [sqrt(pi), pi];
|
||||
%$ t(1) = 1;
|
||||
%$ catch
|
||||
%$ t(1) = 0;
|
||||
%$ end
|
||||
%$
|
||||
%$ % Instantiate a time series object.
|
||||
%$ if t(1)
|
||||
%$ t(2) = dyn_assert(ts1.vobs,3);
|
||||
%$ t(3) = dyn_assert(ts1.nobs,40);
|
||||
%$ t(4) = dyn_assert(ts1.name{2},'A2');
|
||||
%$ t(5) = dyn_assert(ts1.name{1},'A1');
|
||||
%$ t(6) = dyn_assert(ts1.name{3},'A3');
|
||||
%$ t(7) = dyn_assert(ts1.data,[[A(1:2,1); repmat(sqrt(pi),5,1); A(8:end,1)], [A(1:2,2); repmat(pi,5,1); A(8:end,2)], A(:,3)],1e-15);
|
||||
%$ end
|
||||
%$ T = all(t);
|
||||
%@eof:17
|
||||
|
||||
%@test:18
|
||||
%$ % Define a datasets.
|
||||
%$ A = rand(40,3); B = rand(40,1);
|
||||
%$
|
||||
%$ % Instantiate two dynSeries object.
|
||||
%$ ts1 = dynSeries(A,'1950Q1',{'A1';'A2';'A3'},[]);
|
||||
%$ ts2 = dynSeries(B,'1950Q1',{'B1'},[]);
|
||||
%$
|
||||
%$ % modify first object.
|
||||
%$ try
|
||||
%$ d1 = dynDate('1950Q3');
|
||||
%$ d2 = dynDate('1951Q3');
|
||||
%$ rg = d1:d2;
|
||||
%$ ts1{'A1','A2'}(rg) = ones(5,1);
|
||||
%$ t(1) = 1;
|
||||
%$ catch
|
||||
%$ t(1) = 0;
|
||||
%$ end
|
||||
%$
|
||||
%$ % Instantiate a time series object.
|
||||
%$ if t(1)
|
||||
%$ t(2) = dyn_assert(ts1.vobs,3);
|
||||
%$ t(3) = dyn_assert(ts1.nobs,40);
|
||||
%$ t(4) = dyn_assert(ts1.name{2},'A2');
|
||||
%$ t(5) = dyn_assert(ts1.name{1},'A1');
|
||||
%$ t(6) = dyn_assert(ts1.name{3},'A3');
|
||||
%$ t(7) = dyn_assert(ts1.data,[[A(1:2,1); ones(5,1); A(8:end,1)], [A(1:2,2); ones(5,1); A(8:end,2)], A(:,3)],1e-15);
|
||||
%$ end
|
||||
%$ T = all(t);
|
||||
%@eof:18
|
Loading…
Reference in New Issue