%I A086472
%S A086472 2,3,5,7,11,13,17,19,23,29,31,37,41,47,53,59,61,67,71,73,79,83,89,97,
%T A086472 101,103,107,109,113,127,137,139,149,157,163,167,173,179,193,197,199,
%U A086472 211,223,227,229,233,239,241,251,257,263,269,271,277,281,283,293,307
%N A086472 Primes which are sum of two palindromes.
%C A086472 Many small primes are members. 43 is the first prime which is not a member.
%e A086472 41 = 33 + 8, 47 = 44 + 3 are members but 43 is not.
%t A086472 pal = Select[ Range[1000], FromDigits[ Reverse[ IntegerDigits[ # ]]] 
               == # &];
%Y A086472 Cf. A086473.
%Y A086472 Sequence in context: A154363 A049555 A052042 this_sequence A109611 A078133 
               A167773
%Y A086472 Adjacent sequences: A086469 A086470 A086471 this_sequence A086473 A086474 
               A086475
%K A086472 base,easy,nonn
%O A086472 1,1
%A A086472 Amarnath Murthy (amarnath_murthy(AT)yahoo.com), Jul 21 2003
%E A086472 Edited, corrected and extended by Robert G. Wilson v (rgwv(AT)rgwv.com), 
               Jul 27 2003