|
|
A023363
|
|
a(n+1) = a(n) converted to base 6 from base 2 (written in base 10).
|
|
1
|
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
EXAMPLE
|
6 in binary is 110. Reinterpreting 110 in base 6 gives 1 * 6^2 + 1 * 6^1 + 0 * 6^0 = 36 + 6 = 42.
|
|
MATHEMATICA
|
NestList[FromDigits[IntegerDigits[#, 2], 6] &, 2, 8] (* Alonso del Arte, Jan 22 2019 *)
|
|
PROG
|
(PARI) a(n) = if (n==1, 2, fromdigits(binary(a(n-1)), 6)); \\ Michel Marcus, Jan 22 2019
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|