[?1049h[?1h=[?12;25h[?12l[?25h[?25l"~/Mystuff/Econometrics/Examples/DataProblems/collinearity.m" 16L, 335C1;
function results = wrapper(args)
  rho = args{1};
  n = args{2};
  x1 = randn(n,1);
  x2 = rho*x1 + (1-rho)*randn(n,1);
  y = x1 + x2 + randn(n,1);
  x = [ones(n,1) x1 x2];
  b = mc_ols(y,x);
  results = b';
endfunction

reps = 1000;
outfile = "collinearity_mc.out";
args = {0.9, 100};
montecarlo("wrapper", args, reps, outfile);
~                                                                                                                    ~                                                                                                                    ~                                                                                                                    ~                                                                                                                    ~                                                                                                                    ~                                                                                                                    ~                                                                                                                    ~                                                                                                                    ~                                                                                                                    ~                                                                                                                    ~                                                                                                                    ~                                                                                                                    ~                                                                                                                    ~                                                                                                                    ~                                                                                                                    ~                                                                                                                    14,11All]2;collinearity.m (~/Mystuff/Econometrics/Examples/DataProblems) - VIM[?12l[?25h[?25l^[[?12l[?25h[?25l  [?12l[?25h[?25l::[?12l[?25hq[?25l[?12l[?25h
[?25l]2;DataProblems : octave[?1l>[?12l[?25h[?1049l