/*
** Lesson 3.5: Model Stability
*/
use gpe2;
output file = gpe\output3.5 reset;
load data[40,6] = gpe\cjx.txt;

year = data[2:40,1];
X = ln(data[2:40,2]);
L = ln(data[2:40,3]);
K = ln(data[2:40,5]);
call reset;
_names = {"X", "L", "K"};

call cusums(X,L~K);
call hansen(X,L~K);

end;

#include gpe\stability.gpe;