|
%I #21 Mar 17 2023 12:54:27
%S 919,929,99999199999,99999999299999999,9999999992999999999,
%T 999999999999919999999999999,99999999999999499999999999999,
%U 999999999999999999999949999999999999999999999,99999999999999999999999999899999999999999999999999999
%N Palindromic primes in which a single digit is sandwiched between nonempty strings of 9's.
%H Alois P. Heinz, <a href="/A088284/b088284.txt">Table of n, a(n) for n = 1..20</a>
%H Hans Havermann, <a href="http://gladhoboexpress.blogspot.ca/2016/03/near-rep-nine-palindromic-primes.html">Near-rep-nine palindromic primes</a>
%t Select[Flatten[Table[FromDigits[Join[PadRight[{},n,9],{d},PadRight[{},n,9]]],{n,30},{d,Range[8]}]],PrimeQ] (* _Harvey P. Dale_, Mar 17 2023 *)
%Y Subsequence of A002385.
%Y Cf. A088281, A088282, A088283.
%K base,nonn
%O 1,1
%A _Amarnath Murthy_, Sep 29 2003
%E More terms from _David Wasserman_, Aug 03 2005
%E Name clarified by _Christian Stump_, Mar 31 2015
|
