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 A069679 #21 Jul 23 2023 01:50:10 %S A069679 2,3,5,7,11,13,17,19,23,29,31,37,41,43,47,53,59,61,67,71,73,79,83,89, %T A069679 97,149,241,347,349,443,449,541,547,641,643,647,743,941,947,1447,2441, %U A069679 2447,3449,4441,4447,5441,5443,5449,6449,8443,8447,14447,14449,24443,44449 %N A069679 Primes with either no internal digits or all internal digits are 4. %H A069679 Harvey P. Dale, <a href="/A069679/b069679.txt">Table of n, a(n) for n = 1..77</a> (all terms up to the one millionth prime) %t A069679 Join[Prime[Range[25]],Select[Prime[Range[26,5000]],Union[Most[Rest[ IntegerDigits[ #]]]] =={4}&]] (* _Harvey P. Dale_, Dec 08 2022 *) %Y A069679 Cf. A069675, A069676, A069677, A069678, A069680, A069681, A069682, A069683, A069684. %K A069679 nonn,base %O A069679 1,1 %A A069679 _Amarnath Murthy_, Apr 06 2002 %E A069679 Corrected by _Ray Chandler_, Nov 24 2003 %E A069679 Offset corrected and name changed by _Arkadiusz Wesolowski_, Sep 07 2011