|
Search: id:A162945
|
|
|
| A162945 |
|
Numbers n with squares that are concatenations n^2=x//y such x is an anagram of y. |
|
+0
1
|
|
| 836, 3911, 6926, 6941, 9701, 9786, 32119, 35268, 39011, 40104, 40645, 40991, 41489, 42849, 43204, 45743, 49498, 50405, 50705, 54335, 55493, 57089, 57111, 59872, 60406, 62043, 64396, 64671, 66979, 68595, 69028, 69907, 70107, 72475, 73625, 75926, 76279
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
Cases with leading zeros in y, for example 51674^2=2670202276, are not admitted.
|
|
EXAMPLE
|
836^2 = 698896 = 698//896 and 698 is an anagram of 896.
|
|
MAPLE
|
isA162945 := proc(n) local n2, x, y ; n2 := convert(n^2, base, 10) ; if nops(n2) mod 2 = 0 then if op(nops(n2)/2, n2) <> 0 then y := sort( [op(1..nops(n2)/2, n2)] ); x := sort( [op(nops(n2)/2+1..nops(n2), n2)] ); RETURN( x = y) ; else false; fi; else false; fi; end:
for n from 1 to 90000 do if isA162945(n) then printf("%d, \n", n) ; fi; od: # R. J. Mathar, Jul 21 2009
|
|
CROSSREFS
|
Sequence in context: A045070 A095257 A113856 this_sequence A138850 A016113 A167603
Adjacent sequences: A162942 A162943 A162944 this_sequence A162946 A162947 A162948
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
Claudio L Meller (claudiomeller(AT)gmail.com), Jul 18 2009
|
|
EXTENSIONS
|
Keyword:base added by R. J. Mathar (mathar(AT)strw.leidenuniv.nl) Jul 21 2009
|
|
|
Search completed in 0.002 seconds
|
