# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/

Search: id:a046852
Showing 1-1 of 1

%I A046852 #14 Nov 21 2013 12:47:07
%S A046852 1,5,31,247,2927,297937,39263057,5959285217,1083245729387,
%T A046852 207735268337827,65180687788497661,23058721563350868863,
%U A046852 8618531530355825754989,3307472964561561236731357
%N A046852 Numerator of sum of reciprocals of first n palindromic primes.
%H A046852 Vincenzo Librandi, <a href="/A046852/b046852.txt">Table of n, a(n) for n = 1..100</a>
%e A046852 1/2 + 1/3 + 1/5 + 1/7 + 1/11 + 1/101 + ... gives 1/2, 5/6, 31/30, 247/210, ...
%t A046852 palQ[n_]:=Module[{idn=IntegerDigits[n]},idn==Reverse[idn]]; Numerator[ Accumulate[1/#&/@Select[Prime[Range[200]],palQ]]] (* _Harvey P. Dale_, Dec 21 2011 *)
%Y A046852 Cf. A046853, A002385.
%K A046852 nonn,frac,base
%O A046852 1,2
%A A046852 _G. L. Honaker, Jr._
%E A046852 More terms from _Erich Friedman_, Jun 03 2001

# Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE