cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A052050 Squares whose digits occur with an equal minimal frequency of 2.

Original entry on oeis.org

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
Offset: 1

Views

Author

Patrick De Geest, Dec 15 1999

Keywords

Comments

There are A225428(10)=597959 terms in this sequence. The last term is 99887301530267526144 = 9994363488^2. - Hugo Pfoertner, May 12 2023

Crossrefs

Programs

  • Mathematica
    Select[Table[n^2, {n, 6760}], Union[Last[Transpose[Tally[IntegerDigits[#]]]]] == {2} &] (* Jayanta Basu, Jun 17 2013 *)
  • 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})
    print(list(islice(afull(), 47))) # Michael S. Branicky, May 12 2023