2013-06-24 12:26:58 +02:00
|
|
|
function display(A)
|
|
|
|
%@info:
|
|
|
|
%! @deftypefn {Function File} display (@var{A})
|
2013-10-18 17:38:43 +02:00
|
|
|
%! @anchor{@dseries/display}
|
2013-06-24 12:26:58 +02:00
|
|
|
%! @sp 1
|
2013-10-18 17:38:43 +02:00
|
|
|
%! Overloads the disp method for the Dynare time series class (@ref{dseries}).
|
2013-06-24 12:26:58 +02:00
|
|
|
%! @sp 2
|
|
|
|
%! @strong{Inputs}
|
|
|
|
%! @sp 1
|
|
|
|
%! @table @ @var
|
|
|
|
%! @item A
|
2013-10-18 17:38:43 +02:00
|
|
|
%! Dynare time series object instantiated by @ref{dseries}.
|
2013-06-24 12:26:58 +02:00
|
|
|
%! @end table
|
|
|
|
%! @sp 1
|
|
|
|
%! @strong{Outputs}
|
|
|
|
%! @sp 1
|
|
|
|
%! None
|
|
|
|
%! @end deftypefn
|
|
|
|
%@eod:
|
2013-09-05 12:31:37 +02:00
|
|
|
|
2013-06-26 16:10:56 +02:00
|
|
|
vspace = ' ';
|
|
|
|
TABLE = ' ';
|
2013-09-03 17:54:18 +02:00
|
|
|
|
2014-03-22 12:24:30 +01:00
|
|
|
if A.vobs<=10
|
|
|
|
if A.nobs<=40
|
|
|
|
separator = repmat(' | ',A.nobs+1,1);
|
2013-09-03 17:54:18 +02:00
|
|
|
for t=1:A.nobs
|
2014-03-22 12:24:30 +01:00
|
|
|
TABLE = char(TABLE, date2string(A.dates(t)));
|
|
|
|
end
|
|
|
|
for i = 1:A.vobs
|
|
|
|
TABLE = horzcat(TABLE,separator);
|
|
|
|
tmp = A.name{i};
|
|
|
|
for t=1:A.nobs
|
|
|
|
tmp = char(tmp,num2str(A.data(t,i)));
|
|
|
|
end
|
|
|
|
TABLE = horzcat(TABLE, tmp);
|
|
|
|
end
|
|
|
|
else
|
|
|
|
n = 10;
|
|
|
|
separator = repmat(' | ',2*n+3,1);
|
|
|
|
for t=1:n
|
|
|
|
TABLE = char(TABLE, date2string(A.dates(t)));
|
|
|
|
end
|
|
|
|
TABLE = char(TABLE,vspace);
|
|
|
|
for t = A.nobs-n:A.nobs
|
|
|
|
TABLE = char(TABLE, date2string(A.dates(t)));
|
|
|
|
end
|
|
|
|
for i=1:A.vobs
|
|
|
|
TABLE = horzcat(TABLE,separator);
|
|
|
|
tmp = A.name{i};
|
|
|
|
for t=1:10
|
|
|
|
tmp = char(tmp,num2str(A.data(t,i)));
|
|
|
|
end
|
|
|
|
tmp = char(tmp,vspace);
|
|
|
|
for t=A.nobs-10:A.nobs
|
|
|
|
tmp = char(tmp,num2str(A.data(t,i)));
|
|
|
|
end
|
|
|
|
TABLE = horzcat(TABLE, tmp);
|
2013-09-03 17:54:18 +02:00
|
|
|
end
|
|
|
|
end
|
|
|
|
else
|
2014-03-22 12:24:30 +01:00
|
|
|
m = 4;
|
|
|
|
if A.nobs<=40
|
|
|
|
separator = repmat(' | ',A.nobs+1,1);
|
|
|
|
for t=1:A.nobs
|
|
|
|
TABLE = char(TABLE, date2string(A.dates(t)));
|
|
|
|
end
|
|
|
|
for i = 1:m
|
|
|
|
TABLE = horzcat(TABLE,separator);
|
|
|
|
tmp = A.name{i};
|
|
|
|
for t=1:A.nobs
|
|
|
|
tmp = char(tmp,num2str(A.data(t,i)));
|
|
|
|
end
|
|
|
|
TABLE = horzcat(TABLE, tmp);
|
|
|
|
end
|
2014-03-24 16:50:32 +01:00
|
|
|
TABLE = horzcat(TABLE, separator, repmat(' ... ', A.nobs+1,1));
|
2014-03-22 12:24:30 +01:00
|
|
|
for i = A.vobs-m+1:A.vobs
|
|
|
|
TABLE = horzcat(TABLE,separator);
|
|
|
|
tmp = A.name{i};
|
|
|
|
for t=1:A.nobs
|
|
|
|
tmp = char(tmp,num2str(A.data(t,i)));
|
|
|
|
end
|
|
|
|
TABLE = horzcat(TABLE, tmp);
|
|
|
|
end
|
|
|
|
else
|
|
|
|
n = 10;
|
|
|
|
separator = repmat(' | ',2*n+3,1);
|
|
|
|
for t=1:n
|
|
|
|
TABLE = char(TABLE, date2string(A.dates(t)));
|
2013-09-03 17:54:18 +02:00
|
|
|
end
|
2014-03-22 12:24:30 +01:00
|
|
|
TABLE = char(TABLE,vspace);
|
|
|
|
for t = A.nobs-n:A.nobs
|
|
|
|
TABLE = char(TABLE, date2string(A.dates(t)));
|
|
|
|
end
|
|
|
|
for i=1:m
|
|
|
|
TABLE = horzcat(TABLE,separator);
|
|
|
|
tmp = A.name{i};
|
|
|
|
for t=1:10
|
|
|
|
tmp = char(tmp,num2str(A.data(t,i)));
|
|
|
|
end
|
|
|
|
tmp = char(tmp,vspace);
|
|
|
|
for t=A.nobs-10:A.nobs
|
|
|
|
tmp = char(tmp,num2str(A.data(t,i)));
|
|
|
|
end
|
|
|
|
TABLE = horzcat(TABLE, tmp);
|
|
|
|
end
|
|
|
|
TABLE = horzcat(TABLE, separator, repmat(' ... ', 2*n+3,1));
|
|
|
|
for i=A.vobs-m+1:A.vobs
|
|
|
|
TABLE = horzcat(TABLE,separator);
|
|
|
|
tmp = A.name{i};
|
|
|
|
for t=1:10
|
|
|
|
tmp = char(tmp,num2str(A.data(t,i)));
|
|
|
|
end
|
|
|
|
tmp = char(tmp,vspace);
|
|
|
|
for t=A.nobs-10:A.nobs
|
|
|
|
tmp = char(tmp,num2str(A.data(t,i)));
|
|
|
|
end
|
|
|
|
TABLE = horzcat(TABLE, tmp);
|
2013-09-05 12:31:37 +02:00
|
|
|
end
|
2013-06-26 16:10:56 +02:00
|
|
|
end
|
|
|
|
end
|
|
|
|
disp(vspace)
|
2013-10-18 17:38:43 +02:00
|
|
|
disp([inputname(1) ' is a dseries object:'])
|
2013-06-26 16:10:56 +02:00
|
|
|
disp(vspace);
|
2014-01-14 15:03:24 +01:00
|
|
|
if ~isempty(strtrim(TABLE))
|
|
|
|
disp(TABLE);
|
|
|
|
disp(vspace);
|
|
|
|
end
|