login
A077546
Primes of the form floor(n*Pi).
2
3, 31, 37, 43, 47, 53, 59, 97, 103, 109, 113, 131, 157, 163, 179, 191, 197, 223, 229, 241, 251, 257, 263, 307, 311, 317, 367, 373, 383, 389, 433, 439, 449, 461, 499, 521, 571, 587, 593, 631, 647, 653, 659, 691, 709, 719, 757, 769, 797, 823, 829, 857, 863, 907
OFFSET
1,1
LINKS
Keenan Monks, Sarah Peluse, Lynnelle Ye, Strings of special primes in arithmetic progressions, arXiv:1407.1290 [math.NT], 2014.
MATHEMATICA
Select[Floor[Range[0, 100000]*Pi], PrimeQ] (* Vincenzo Librandi, Dec 09 2011 *)
PROG
(PARI) lista(nn) = {for (n=1, nn, if (isprime(p=floor(Pi*n)), print1(p, ", ")); ); } \\ Michel Marcus, Jul 07 2014
(PARI) select(isprime, [1..1000]*Pi\1) \\ Charles R Greathouse IV, Jul 07 2014
CROSSREFS
Cf. A062408.
Sequence in context: A238197 A042477 A023297 * A168274 A141177 A154502
KEYWORD
nonn
AUTHOR
Amarnath Murthy, Nov 09 2002
EXTENSIONS
More terms from Sascha Kurz, Jan 12 2003
STATUS
approved