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-2 of 2 results.

A062372 Numbers the product of whose nonzero digits is a cube.

Original entry on oeis.org

1, 8, 10, 11, 18, 24, 39, 42, 80, 81, 88, 93, 100, 101, 108, 110, 111, 118, 124, 139, 142, 180, 181, 188, 193, 204, 214, 222, 240, 241, 248, 284, 309, 319, 333, 389, 390, 391, 398, 402, 412, 420, 421, 428, 444, 469, 482, 496, 555, 649, 666, 694, 777, 800, 801
Offset: 1

Views

Author

Amarnath Murthy, Jun 26 2001

Keywords

Examples

			142 is a member as 1*4*2 = 8 is a cube. 180 is also a member as 1*8 = 8.
		

Crossrefs

Cf. A062371.

Programs

  • PARI
    ok(k)={my(d=digits(k)); ispower(prod(i=1, #d, if(d[i], d[i], 1)), 3)} \\ Andrew Howroyd, Jun 29 2018

Extensions

Corrected and extended by Larry Reeves (larryr(AT)acm.org), Jul 06 2001
Offset changed by Andrew Howroyd, Sep 17 2024

A174800 Number whose product of digits is a square.

Original entry on oeis.org

0, 1, 4, 9, 10, 11, 14, 19, 20, 22, 28, 30, 33, 40, 41, 44, 49, 50, 55, 60, 66, 70, 77, 80, 82, 88, 90, 91, 94, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, 114, 119, 120, 122, 128, 130, 133, 140, 141, 144, 149, 150, 155, 160, 166, 170, 177, 180, 182, 188, 190, 191, 194, 199, 200
Offset: 0

Views

Author

Michel Lagneau, Dec 01 2010

Keywords

Comments

Differs from A062371 in that here the digit 0 is included in the product and so every number containing a zero belongs to this sequence. - D. S. McNeil, Dec 01 2010

Examples

			149 is in the sequence because 1*4*9 = 6^2; 20 is in the sequence because 2*0 = 0^2.
		

Crossrefs

Cf. A062371.

Programs

  • Mathematica
    Select[Range[1000], IntegerQ[Sqrt[Times @@ (IntegerDigits[#])]] &]
Showing 1-2 of 2 results.