A077546 Primes of the form floor(n*Pi).

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

Vincenzo Librandi, Table of n, a(n) for n = 1..5000

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

Adjacent sequences: A077543 A077544 A077545 * A077547 A077548 A077549

Keyword

nonn

Author

Amarnath Murthy, Nov 09 2002

Extensions

More terms from Sascha Kurz, Jan 12 2003

Status

approved