login
A246972
(n+1)^2 concatenated with n^2.
5
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
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
KEYWORD
nonn,base
AUTHOR
N. J. A. Sloane, Sep 13 2014
STATUS
approved