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.

A352464 Numbers k whose decimal expansion ends in the product of digits of k.

Original entry on oeis.org

1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 30, 40, 50, 60, 70, 80, 90, 100, 110, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 130, 140, 150, 160, 170, 180, 190, 200, 210, 220, 230, 236, 240, 250, 260, 270, 280, 290, 300, 310, 315, 320, 324, 330, 340, 350, 360, 370, 380, 390, 400
Offset: 1

Views

Author

Eric Angelini and Carole Dubois, Mar 17 2022

Keywords

Examples

			   10 is a term because  "10" ends in  "0" = 1*0;
  118 is a term because "118" ends in  "8" = 1*1*8;
  236 is a term because "236" ends in "36" = 2*3*6; etc.
		

Crossrefs

Programs

  • Mathematica
    q[n_] := Module[{d = IntegerDigits[n], p, dp, ndp}, p = Times @@ d; dp = IntegerDigits[p]; ndp = Length[dp]; dp == d[[-ndp ;; -1]]]; Select[Range[400], q] (* Amiram Eldar, Mar 17 2022 *)
  • Python
    from math import prod
    def ok(n): s = str(n); return s.endswith(str(prod(map(int, s))))
    print([k for k in range(1, 401) if ok(k)]) # Michael S. Branicky, Mar 17 2022