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