login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A068947
Square roots of A068809.
4
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
OFFSET
1,2
LINKS
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
KEYWORD
nonn,base
AUTHOR
Francois Jooste (phukraut(AT)hotmail.com), Mar 15 2002
STATUS
approved