A246972 (n+1)^2 concatenated with n^2.

10, 41, 94, 169, 2516, 3625, 4936, 6449, 8164, 10081, 121100, 144121, 169144, 196169, 225196, 256225, 289256, 324289, 361324, 400361, 441400, 484441, 529484, 576529, 625576, 676625, 729676, 784729, 841784, 900841, 961900, 1024961, 10891024, 11561089, 12251156, 12961225, 13691296

Offset

0,1

Links

Vincenzo Librandi, Table of n, a(n) for n = 0..1000

Mathematica

Table[FromDigits[Join[Flatten[IntegerDigits[{(n + 1)^2, n^2}]]]], {n, 0, 50}] (* Vincenzo Librandi, Sep 13 2014 *)
FromDigits/@(Join[IntegerDigits[#[[2]]], IntegerDigits[#[[1]]]]&/@ Partition[ Range[0, 40]^2, 2, 1]) (* Harvey P. Dale, Apr 16 2015 *)

Prog

(Magma) [10] cat [Seqint(Intseq(n^2) cat Intseq(n^2+2*n+1)): n in [1..50]]; // Vincenzo Librandi, Sep 13 2014
(Python)
def A246972(n):
....return int(str((n+1)**2)+str(n**2)) # Chai Wah Wu, Sep 13 2014

Crossrefs

Cf. A246973, A235497. For primes, see A104301.

Sequence in context: A003355 A247201 A022278 * A266396 A006323 A178073

Adjacent sequences: A246969 A246970 A246971 * A246973 A246974 A246975

Keyword

nonn,base

Author

N. J. A. Sloane, Sep 13 2014

Status

approved