The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

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 56th year, we are closing in on 350,000 sequences, and we’ve crossed 9,700 citations (which often say “discovered thanks to the OEIS”).

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A084009 a(n) = n^2 concatenated with reverse(n^2) divided by 11. 1
 0, 1, 4, 9, 151, 232, 333, 454, 586, 738, 9091, 11011, 13131, 15451, 17881, 20502, 23332, 26362, 29493, 32833, 36364, 40104, 44044, 48175, 52425, 56866, 61516, 66357, 71317, 76468, 81819, 87379, 931291, 990891, 1051501, 1114111, 1178811 (list; graph; refs; listen; history; text; internal format)
 OFFSET 0,3 LINKS EXAMPLE a(12) = 144441/11 = 13131. MAPLE a:=proc(n) local nn, s: nn:=convert(n^2, base, 10): s:=nops(nn): (10^s*n^2+add(nn[1+s-j]*10^(j-1), j=1..s))/11 end: seq(a(n), n=0..39); # Emeric Deutsch, Feb 25 2005 MATHEMATICA n2c[n_]:=Module[{idn2=IntegerDigits[n^2]}, FromDigits[Join[idn2, Reverse[ idn2]]]/11]; Array[n2c, 40, 0] (* Harvey P. Dale, May 27 2014 *) PROG (PARI) a(n) = my(d=digits(n^2)); eval(fromdigits(concat(d, Vecrev(d))))/11; \\ Michel Marcus, Sep 12 2017 CROSSREFS Cf. A084008, A084010. Sequence in context: A061267 A061269 A061271 * A306739 A318616 A029738 Adjacent sequences:  A084006 A084007 A084008 * A084010 A084011 A084012 KEYWORD base,nonn AUTHOR Amarnath Murthy and Meenakshi Srikanth (menakan_s(AT)yahoo.com), May 23 2003 EXTENSIONS More terms from Emeric Deutsch, Feb 25 2005 STATUS approved

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 December 3 15:34 EST 2021. Contains 349463 sequences. (Running on oeis4.)