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 A330007 #35 Jul 09 2025 10:05:28 %S A330007 2,3,5,7,11,13,17,19,23,53,59,61,67,71,79,83,89,127,131,137,139,173, %T A330007 179,181,191,269,271,277,281,283,317,331,419,421,431,461,463,467,479, %U A330007 557,563,569,571,1279,1283,1289,1291,1423,1429,1433,1483,1613,1619,1709,1721,1723,1901,1907,1997,1999,2011,3061,3163,3299 %N A330007 Base-24 integers whose substrings are primes (written in base 10). %C A330007 The largest such number is a(103)=266003, which is written (19|5|19|11)_24 in base 24. %C A330007 We might call these numbers "substrimes" (= substring-primes) since the term (1) is concise, (2) is pronounceable, and (3) keeps these numbers distinct in communication from different but similar sequences (see Crossrefs). %H A330007 Onno M. Cain, <a href="/A330007/a330007.txt">Python Code</a> %e A330007 a(64) = 3299 = (5|17|11)_24 is in the sequence because 5, 17, 11, (5|17)_24=137, (17|11)=419, and 3299 itself are all prime. %t A330007 With[{b = 24}, Select[Range[b^4], Function[{s, n}, AllTrue[Flatten@ Array[FromDigits[#, b] & /@ Partition[s, #, 1] &, n], PrimeQ]] @@ {#, Length@ #} &@ IntegerDigits[#, b] &]] (* _Michael De Vlieger_, Dec 15 2019 *) %o A330007 (Python) # see Cain link %Y A330007 Cf. A024773, A085823, A085822, A213300. %K A330007 nonn,base,fini %O A330007 1,1 %A A330007 _Onno M. Cain_, Nov 26 2019