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 A202262 #34 Dec 20 2019 06:44:56 %S A202262 4,6,8,9,44,46,48,49,64,66,68,69,84,86,88,94,96,98,99,444,446,448,464, %T A202262 466,468,469,484,486,488,494,496,498,644,646,648,649,664,666,668,669, %U A202262 684,686,688,694,696,698,699,844,846,848,849,864,866,868,869,884,886 %N A202262 Composite numbers in which all substrings are composite. %C A202262 Subsequence of A062115, A202260, A029581. %C A202262 Supersequence of A202265. %C A202262 This is a 10-automatic sequence, see A071062. - _Charles R Greathouse IV_, Jan 01 2012 %H A202262 Rémy Sigrist, <a href="/A202262/b202262.txt">Table of n, a(n) for n = 1..10000</a> %H A202262 Rémy Sigrist, <a href="/A202262/a202262.gp.txt">PARI program for A202262</a> %H A202262 <a href="/index/Ar#10-automatic">Index entries for 10-automatic sequences</a> %t A202262 sub[n_] := Block[{d = IntegerDigits[n]}, Union@ Reap[ Do[Sow@ FromDigits@ Take[d, {i, j}], {j, Length@ d}, {i, j}]][[2, 1]]]; Select[ Range@ 900, Union[{4, 6, 8, 9}, IntegerDigits[#]] == {4, 6, 8, 9} && AllTrue[sub[#], CompositeQ] &] (* _Giovanni Resta_, Dec 20 2019 *) %o A202262 (PARI) See Links section. %Y A202262 Cf. A085823 (primes in which all substrings are primes), A068669 (noncomposite numbers in which all substrings are noncomposite), A062115 (nonprimes in which all substrings are nonprimes). %Y A202262 Cf. A010051. %K A202262 nonn,base %O A202262 1,1 %A A202262 _Jaroslav Krizek_, Dec 25 2011 %E A202262 Data corrected by _Reinhard Zumkeller_, May 05 2012 %E A202262 Data corrected by _Rémy Sigrist_, Dec 19 2019 %E A202262 Incorrect Haskell program deleted by _M. F. Hasler_, Dec 20 2019