|
|
A052050
|
|
Squares whose digits occur with an equal minimal frequency of 2.
|
|
12
|
|
|
7744, 228484, 332929, 339889, 511225, 698896, 774400, 776161, 797449, 11303044, 11464996, 15295921, 16621929, 22848400, 25775929, 27447121, 28826161, 33292900, 33454656, 33512521, 33988900, 34316164, 42549529, 45643536, 45859984, 47969476, 48177481, 50509449, 51122500
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
There are A225428(10)=597959 terms in this sequence. The last term is 99887301530267526144 = 9994363488^2. - Hugo Pfoertner, May 12 2023
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[Table[n^2, {n, 6760}], Union[Last[Transpose[Tally[IntegerDigits[#]]]]] == {2} &] (* Jayanta Basu, Jun 17 2013 *)
|
|
PROG
|
(Python)
from itertools import islice
from collections import Counter
def afull(): yield from (x**2 for x in range(10**10) if set(Counter(str(x**2)).values()) == {2})
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base,fini
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|