cp's OEIS Frontend

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.

A069684 Primes with either no internal digits or all internal digits are 9.

This page as a plain text file.
%I A069684 #36 Jul 29 2025 19:15:18
%S A069684 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 A069684 97,191,193,197,199,293,397,491,499,593,599,691,797,991,997,1993,1997,
%U A069684 1999,2999,4993,4999,6991,6997,7993,8999,19991,19993,19997,49991,49993,49999
%N A069684 Primes with either no internal digits or all internal digits are 9.
%H A069684 Harvey P. Dale, <a href="/A069684/b069684.txt">Table of n, a(n) for n = 1..252</a> (All terms with less than 500 digits.)
%t A069684 Join[Prime[Range[25]],Select[Flatten[Table[FromDigits[Join[{d1},PadRight[{},n,9],{d2}]],{n,150},{d1,9},{d2,{1,3,7,9}}]],PrimeQ]] (* _Harvey P. Dale_, Nov 10 2024 *)
%t A069684 Join[Prime[Range[25]],Select[Prime[Range[26,5200]],Union[Most[Rest[IntegerDigits[#]]]]=={9}&]] (* _Harvey P. Dale_, Jul 29 2025 *)
%Y A069684 Cf. A069675, A069676, A069677, A069678, A069679, A069680, A069681, A069682, A069683.
%K A069684 nonn,base
%O A069684 1,1
%A A069684 _Amarnath Murthy_, Apr 06 2002
%E A069684 Corrected by _Ray Chandler_, Nov 24 2003
%E A069684 Offset corrected and name changed by _Arkadiusz Wesolowski_, Sep 07 2011