cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

Showing 1-2 of 2 results.

A067559 Numbers n such that floor(Pi*n^2) is prime.

Original entry on oeis.org

1, 6, 17, 31, 34, 41, 45, 50, 51, 61, 69, 73, 74, 81, 103, 108, 111, 142, 148, 175, 192, 201, 202, 203, 232, 234, 273, 277, 281, 310, 319, 329, 342, 348, 349, 351, 378, 387, 416, 421, 428, 435, 459, 478, 486, 521, 526, 575, 593, 597, 603, 605, 623, 648, 661
Offset: 1

Views

Author

Joseph L. Pe, Jan 29 2002

Keywords

Examples

			Floor[Pi*6^2] = 113, a prime, so 6 is a term of the sequence.
		

Crossrefs

Cf. A062408.

Programs

  • Mathematica
    Select[Range[1, 10^3], PrimeQ[Floor[Pi * #^2]] &]
  • PARI
    is(n)=isprime(floor(Pi*n^2)) \\ Charles R Greathouse IV, May 22 2017

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

Original entry on oeis.org

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

Views

Author

Amarnath Murthy, Nov 09 2002

Keywords

Crossrefs

Cf. A062408.

Programs

  • Mathematica
    Select[Floor[Range[0,100000]*Pi],PrimeQ] (* Vincenzo Librandi, Dec 09 2011 *)
  • 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

Extensions

More terms from Sascha Kurz, Jan 12 2003
Showing 1-2 of 2 results.