|
| |
| |
|
|
|
1, 2, 3, 7, 13, 17, 43, 63, 83, 167, 264, 313, 707, 836, 1667, 2236, 3114, 4472, 6833, 8167, 8937, 16667, 21886, 29614, 41833, 74833, 89437, 94863, 134164, 191833, 298327, 545793, 547613, 947617, 987917, 1643167, 3143167, 3162083, 5477133
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
EXAMPLE
| 13^2=169=A068809(5), so a(5)=13.
|
|
|
MAPLE
| A007953 := proc(n) option remember: return add(d, d=convert(n, base, 10)): end: A068947 := proc(n) option remember: local k, p: if(n=1)then return 1: fi: k:=procname(n-1): p:=A007953(k^2): do k:=k+1: if(A007953(k^2)>p)then return k: fi: od: end: seq(A068947(n), n=1..20); # Nathaniel Johnston, May 04 2011
|
|
|
CROSSREFS
| Cf. A068809, A068948, A068949, A068950, A068952, A000548, A069324, A040047.
Sequence in context: A032449 A129941 A159079 * A068948 A155479 A019411
Adjacent sequences: A068944 A068945 A068946 * A068948 A068949 A068950
|
|
|
KEYWORD
| nonn,base
|
|
|
AUTHOR
| Francois Jooste (phukraut(AT)hotmail.com), Mar 15 2002
|
| |
|
|
