OFFSET
1,2
COMMENTS
The difference between A162438(n) - A162437(n): 0, 0, 1, 5, 45, 1453, 372141, 3048582573, ..., . - Robert G. Wilson v, Jul 27 2009
EXAMPLE
The binary representation of the first few terms: 1, 10, 110, 11010, 11011010.
MATHEMATICA
a[1] = 1; a[2] = 2; a[n_] := Block[ {a1 = IntegerDigits[a[n - 1], 2], a2 = IntegerDigits[ a[n - 2], 2]}, Max[ FromDigits[ Join[a1, a2], 2], FromDigits[ Join[a2, a1], 2]]]; Array[a, 13] (* Robert G. Wilson v, Jul 27 2009 *)
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Leroy Quet, Jul 03 2009
EXTENSIONS
More terms from Robert G. Wilson v, Jul 27 2009
STATUS
approved