OFFSET
0,1
LINKS
T. D. Noe, Rows n = 0..100 of triangle, flattened
FORMULA
MATHEMATICA
t = 4^Range[0, 9]; Select[Union[Flatten[Table[i + j, {i, t}, {j, t}]]], # <= t[[-1]] + 1 &] (* T. D. Noe, Oct 09 2011 *)
Union[Total/@Tuples[4^Range[0, 9], 2]] (* Harvey P. Dale, Mar 25 2012 *)
CROSSREFS
KEYWORD
AUTHOR
Henry Bottomley, Jun 22 2000
STATUS
approved