%I A118625
%S A118625 2,3,5,19,47,67,73,97,139,163,211,263,281,307,379,401,433,457,479,499,
%T A118625 503,523,569,571,641,647,719,739,811,859,883,1187,1193,1259,1289,1409,
%U A118625 1423,1427,1499,1571,1619,1637,1663,1787,1879,1901,1907,1951,1999,2089
%N A118625 Primes p such that the nearest integer to p * K is prime, where K is 
               Catalan's constant.
%t A118625 lst={};Do[p=Prime[n];If[PrimeQ[round[p*Catalan]],AppendTo[lst,p]],{n,
               10^3}];lst
%Y A118625 Sequence in context: A072532 A038705 A066754 this_sequence A031133 A028490 
               A004064
%Y A118625 Adjacent sequences: A118622 A118623 A118624 this_sequence A118626 A118627 
               A118628
%K A118625 nonn,easy,new
%O A118625 1,1
%A A118625 Vladimir Orlovsky (4vladimir(AT)gmail.com), Aug 25 2008
%E A118625 Edited by Charles R Greathouse IV (charles.greathouse(AT)case.edu), Nov 
               11 2009