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.
%I A249516 #24 Jun 11 2025 03:59:14
%S A249516 0,1,2,3,4,5,6,7,8,9,11,111,1111,1288,1557,1575,1755,1828,1882,2188,
%T A249516 2818,2881,3448,3484,3577,3757,3775,3844,4348,4384,4438,4483,4834,
%U A249516 4843,5157,5175,5377,5517,5571,5715,5737,5751,5773,7155,7357,7375,7515,7537,7551
%N A249516 Numbers k for which the digital product A007954(k) contains the same distinct digits as the number k.
%H A249516 Harvey P. Dale, <a href="/A249516/b249516.txt">Table of n, a(n) for n = 1..1000</a>
%e A249516 1288 is a member since 1288 and its digital product 1*2*8*8 = 128 have the same digit set {1,2,8}.
%t A249516 Select[Range[0,8000],Union[IntegerDigits[Times@@IntegerDigits[#]]] == Union[ IntegerDigits[#]]&] (* _Harvey P. Dale_, Aug 05 2018 *)
%o A249516 (Magma) [0] cat [n: n in [0..100000] | Set(Intseq(n)) eq Set(Intseq(&*Intseq(n)))];
%o A249516 (PARI) print1(0,", ");for(n=1,10^4,d=digits(n);p=prod(i=1,#d,d[i]);if(vecsort(digits(p),,8)==vecsort(d,,8),print1(n,", "))) \\ _Derek Orr_, Nov 05 2014
%Y A249516 Cf. A007954, A249515, A249517.
%K A249516 nonn,base,easy
%O A249516 1,3
%A A249516 _Jaroslav Krizek_, Oct 31 2014