OFFSET
0,1
EXAMPLE
floor(Pi*2)=6, which is not prime.
floor(Pi*3)=9, which is not prime.
floor(Pi*5)=15, which is not prime.
The smallest prime x for which floor(Pi*x) is prime is 17, so a(1)=17. (floor(Pi*17)=53.)
MATHEMATICA
For[i = 1, i < 1000, If[PrimeQ[IntegerPart[Pi*Prime[i]]] == True, Print[Prime[i]]]; i++ ]
CROSSREFS
KEYWORD
nonn
AUTHOR
Neil Fernandez, Jan 27 2003
STATUS
approved