OFFSET
1,1
EXAMPLE
(2, 3), (4, 4, 4, 5), (6, 6, 6, 6, 6, 7), (8, 8, 8, 8, 8, 8, 8, 9), ...
MATHEMATICA
r[1] = Range[4];
r[n_] := r[n] = Range[r[n-1][[-1]]+1, r[n-1][[-1]] + (2n)^2];
s[n_] := Partition[r[n], Sqrt[Length[r[n]]]][[All, n]];
A167991 = Table[s[n], {n, 1, 9}] // Flatten // Differences (* Jean-François Alcover, Mar 27 2017 *)
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Paul Curtz, Nov 16 2009
STATUS
approved