%I A099746
%S A099746 10301,10501,10601,1022201,1028201,1035301,1043401,1055501,1062601,
%T A099746 1065601,1074701,1082801,1085801,1092901,1093901,101030101,101060101,
%U A099746 101141101,101171101,101282101,101292101,101343101,101373101,101414101
%N A099746 Primes arising in A099744.
%C A099746 Prompted by Harvey Dubner's Nov 07 2004 discovery that 10000...000M000...00001
with M=3761673, a palindrome, is a 130023-digit palindromic prime.
%t A099746 p = Select[ Range[ 22322], # == FromDigits[ Reverse[ IntegerDigits[ #
]]] &]; q = Select[p, PrimeQ[ FromDigits[ Join[{1, 0}, IntegerDigits[
# ], {0, 1}]]] &]; Table[ FromDigits[ Join[{1, 0}, IntegerDigits[
q[[n]]], {0, 1}]], {n, 24}]; (from Robert G. Wilson v Nov 20 2004)
%Y A099746 Cf. A099744, A100026, A100027.
%Y A099746 Sequence in context: A157735 A154089 A100502 this_sequence A083438 A144125
A097695
%Y A099746 Adjacent sequences: A099743 A099744 A099745 this_sequence A099747 A099748
A099749
%K A099746 nonn,easy,base
%O A099746 1,1
%A A099746 N. J. A. Sloane (njas(AT)research.att.com), Nov 19 2004
%E A099746 More terms from Robert G. Wilson v (rgwv(AT)rgwv.com), Nov 20 2004
|