|
Search: id:A008467
|
|
|
| A008467 |
|
n OR n^2 (applied to ternary expansions). |
|
+0
3
|
|
| 1, 5, 12, 16, 26, 42, 52, 71, 90, 100, 122, 147, 178, 206, 231, 259, 296, 342, 370, 401, 453, 484, 539, 591, 646, 701, 756, 784, 842, 930, 961, 1025, 1095, 1186, 1259, 1332, 1369, 1445, 1524, 1609, 1691, 1770, 1852, 1943, 2070, 2152, 2237, 2316, 2401, 2510
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
MATHEMATICA
|
b=3; d=9; Mb=Array[ b^(d-#)&, d ]; Map[ Plus@@(Mb*#)&, Array[ Max /@ Transpose[ {IntegerDigits[ #, b, d ], IntegerDigits[ #^2, b, d ]} ]&, 140 ] ]
|
|
CROSSREFS
|
A007745, A008468, A008469.
Sequence in context: A110670 A111523 A078231 this_sequence A076718 A076671 A089988
Adjacent sequences: A008464 A008465 A008466 this_sequence A008468 A008469 A008470
|
|
KEYWORD
|
base,nonn,easy
|
|
AUTHOR
|
Olivier Gerard (olivier.gerard(AT)gmail.com)
|
|
|
Search completed in 0.002 seconds
|
