fork download
  1. f = @(n, m) repmat(repelem(diag([1 1]), n, n), m);
  2. f(2, 3), f(3, 2)
Success #stdin #stdout 0.07s 47124KB
stdin
Standard input is empty
stdout
ans =

   1   1   0   0   1   1   0   0   1   1   0   0
   1   1   0   0   1   1   0   0   1   1   0   0
   0   0   1   1   0   0   1   1   0   0   1   1
   0   0   1   1   0   0   1   1   0   0   1   1
   1   1   0   0   1   1   0   0   1   1   0   0
   1   1   0   0   1   1   0   0   1   1   0   0
   0   0   1   1   0   0   1   1   0   0   1   1
   0   0   1   1   0   0   1   1   0   0   1   1
   1   1   0   0   1   1   0   0   1   1   0   0
   1   1   0   0   1   1   0   0   1   1   0   0
   0   0   1   1   0   0   1   1   0   0   1   1
   0   0   1   1   0   0   1   1   0   0   1   1

ans =

   1   1   1   0   0   0   1   1   1   0   0   0
   1   1   1   0   0   0   1   1   1   0   0   0
   1   1   1   0   0   0   1   1   1   0   0   0
   0   0   0   1   1   1   0   0   0   1   1   1
   0   0   0   1   1   1   0   0   0   1   1   1
   0   0   0   1   1   1   0   0   0   1   1   1
   1   1   1   0   0   0   1   1   1   0   0   0
   1   1   1   0   0   0   1   1   1   0   0   0
   1   1   1   0   0   0   1   1   1   0   0   0
   0   0   0   1   1   1   0   0   0   1   1   1
   0   0   0   1   1   1   0   0   0   1   1   1
   0   0   0   1   1   1   0   0   0   1   1   1