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 A352584 #13 May 30 2023 13:54:11
%S A352584 2,3,5,7,11,13,17,19,23,25,29,31,32,37,41,43,47,53,59,61,67,71,73,79,
%T A352584 83,89,97,101,103,107,109,113,125,127,128,131,135,137,139,149,151,157,
%U A352584 163,167,173,175,179,181,191,193,197,199,211,223,227,229,233,239,241,243,250
%N A352584 Numbers k whose decimal representation contains all distinct prime factors of k as substrings.
%C A352584 All primes (A000040) and powers of 5 (A000351 without 1) are terms.
%H A352584 Harvey P. Dale, <a href="/A352584/b352584.txt">Table of n, a(n) for n = 1..1000</a>
%t A352584 str[n_]:=ToString/@First/@FactorInteger[n];
%t A352584 fQ[n_]:=Union[Table[StringContainsQ[ToString[n],str[n][[i]]],{i,Length[str[n]]}]]=={True}; Select[Range[2,1000],fQ]
%t A352584 dpfQ[n_]:=Union[SequenceCount[IntegerDigits[n],IntegerDigits[#]]&/@(FactorInteger[n][[;;,1]])] == {1}; Select[Range[2,300],dpfQ] (* _Harvey P. Dale_, May 30 2023 *)
%Y A352584 Cf. A000040, A000351, A239058 (divisor substrings).
%K A352584 nonn,base
%O A352584 1,1
%A A352584 _Ivan N. Ianakiev_, Mar 21 2022