This site is supported by donations to The OEIS Foundation. Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A201918 Automorphic numbers: n^2 ends with n in base 12 (written in base 10). 7

%I

%S 0,1,4,9,64,81,513,1216,6400,14337,234496,483328,2502657,17432577,

%T 18399232,412549120,842530816,4317249537,11162091520,50755272705,

%U 692253097984,2178269839360,6737830608897,46758772080640,60234433298433,474731593596928,809186870951937

%N Automorphic numbers: n^2 ends with n in base 12 (written in base 10).

%H Eric M. Schmidt, <a href="/A201918/b201918.txt">Table of n, a(n) for n = 1..1000</a>

%e a(3) = 4 = (4)_12 since 4^2 = 16 = (14)_12 ends with 4 in base 12.

%e a(4) = 9 = (9)_12 since 9^2 = 81 = (69)_12 ends with 9 in base 12.

%e a(5) = 64 = (54)_12 since 64^2 = 4096 = (2454)_12 ends with 54 in base 12.

%t a201918[n_Integer] := Module[{i = 0}, Flatten[Last[Reap[

%t Do[If[

%t IntegerDigits[i^2, 12][[-Length[IntegerDigits[i, 12]] ;; -1]] ==

%t IntegerDigits[i, 12], Sow[i]], {i, n}]]]]]; a201918[12^6] (* _Michael De Vlieger_, Aug 13 2014 *)

%o (Sage) See A003226. - _Eric M. Schmidt_, Feb 09 2014

%Y Cf. A003226, A201821, A201919, A201921, A201948, A237583.

%K nonn,base

%O 1,3

%A _Martin Renner_, Dec 06 2011

%E More terms from _Eric M. Schmidt_, Feb 09 2014

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified September 20 01:58 EDT 2019. Contains 327207 sequences. (Running on oeis4.)