From 6b8062e2968d70711b81e23a098b1e0ca82b402d Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?St=C3=A9phane=20Adjemian=20=28Hermes=29?=
<stephane.adjemian@univ-lemans.fr>
Date: Fri, 16 Oct 2015 17:00:16 +0200
Subject: [PATCH] Fixed bug and added one unit test.
Wrong ordering of the variables in vertical concatenation.
(cherry picked from commit 34eb3107612dcb0c9371d83e9bd3c473d3c63e19)
---
src/@dseries/vertcat.m | 20 +++++++++++++++++++-
1 file changed, 19 insertions(+), 1 deletion(-)
diff --git a/src/@dseries/vertcat.m b/src/@dseries/vertcat.m
index da31789..36aa733 100644
--- a/src/@dseries/vertcat.m
+++ b/src/@dseries/vertcat.m
@@ -68,7 +68,7 @@ function d = vertcat_(b, c)
end
reorder_variables_in_c = false;
if ~isequal(b.name, c.name)
- [t, idx] = ismember(c.name, b.name);
+ [t, idx] = ismember(b.name, c.name);
if all(t)
reorder_variables_in_c = true;
else
@@ -150,3 +150,21 @@ function d = vertcat_(b, c)
%$ t(5) = dassert(ts4.nobs,30);
%$ T = all(t);
%@eof:2
+
+%@test:3
+%$ A = dseries([ones(5,1), 2*ones(5,1)],'1938Q4',{'A1', 'A2'});
+%$ B = dseries([2*ones(2,1), ones(2,1)],'1945Q3',{'A2', 'A1'});
+%$
+%$ try
+%$ C = [A; B];
+%$ t(1) = true;
+%$ catch
+%$ t(1) = false;
+%$ end
+%$
+%$ % Check the results.
+%$ if t(1)
+%$ t(2) = dassert(C.data,[ones(7,1), 2*ones(7,1)]);
+%$ end
+%$ T = all(t);
+%@eof:3
--
GitLab