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.

Showing 1-3 of 3 results.

A136810 Numbers k such that k and k^2 use only the digits 0, 1, 2, 3 and 4.

Original entry on oeis.org

0, 1, 2, 10, 11, 12, 20, 21, 32, 100, 101, 102, 110, 111, 120, 200, 201, 210, 320, 321, 332, 1000, 1001, 1002, 1010, 1011, 1012, 1020, 1021, 1100, 1101, 1102, 1110, 1111, 1200, 1201, 2000, 2001, 2010, 2011, 2100, 2101, 3200, 3210, 3320, 3332, 10000, 10001, 10002, 10010, 10011, 10012, 10020, 10021, 10100, 10101, 10110, 10111, 10120, 10200, 10210, 11000
Offset: 1

Views

Author

Jonathan Wellons (wellons(AT)gmail.com), Jan 22 2008

Keywords

Comments

Generated with DrScheme.

Examples

			3230203421^2 = 10434214141040103241.
		

Crossrefs

Cf. A158304.

A158082 Squares whose decimal expansion contains no digit greater than 4.

Original entry on oeis.org

0, 1, 4, 100, 121, 144, 324, 400, 441, 1024, 1444, 2304, 2401, 10000, 10201, 10404, 12100, 12321, 14400, 22201, 23104, 32041, 32400, 33124, 40000, 40401, 44100, 101124, 102400, 103041, 110224, 114244, 121104, 123201, 130321, 131044, 144400, 203401, 204304, 213444
Offset: 1

Views

Author

N. J. A. Sloane, May 23 2010

Keywords

Crossrefs

Cf. A158304.
Intersection of A000290 and A007091.

Programs

  • Mathematica
    Select[Range[0, 1000]^2, Max[IntegerDigits[#]] <= 4 &] (* Paolo Xausa, Apr 29 2024 *)

A175471 Numbers n such that n^2 contains no digit less than 5.

Original entry on oeis.org

3, 24, 26, 76, 83, 87, 236, 264, 313, 314, 316, 766, 816, 824, 834, 836, 883, 887, 937, 2366, 2383, 2387, 2424, 2563, 2626, 2976, 3114, 7613, 7666, 8117, 8167, 8184, 8234, 8286, 8366, 8716, 8813, 8814, 8887, 8937, 9266, 9316, 9363, 9417, 9474, 9786, 9833
Offset: 1

Views

Author

Zak Seidov, May 24 2010

Keywords

Crossrefs

Programs

  • Mathematica
    Select[Range[10000],Min[IntegerDigits[#^2]]>4&] (* Harvey P. Dale, Dec 31 2013 *)
  • PARI
    isok(n) = vecmin(digits(n^2)) > 4; \\ Michel Marcus, Oct 15 2013
Showing 1-3 of 3 results.