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

Author

N. J. A. Sloane, Sep 13 2014

Keywords

• nonn
• base

Links

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

Crossrefs

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

Programs

Magma

[10] cat [Seqint(Intseq(n^2) cat Intseq(n^2+2*n+1)): n in [1..50]]; // Vincenzo Librandi, Sep 13 2014

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 *)

Python

def A246972(n):
    return int(str((n+1)**2)+str(n**2)) # Chai Wah Wu, Sep 13 2014