OFFSET
0,1
EXAMPLE
The smallest prime x such that floor(x*Pi) is prime, is 17.
floor(17*Pi)=53, so 53 is the first term of the sequence.
MATHEMATICA
For[i = 1, i < 1000, If[PrimeQ[IntegerPart[Pi*Prime[i]]] == True, Print[IntegerPart[Pi*Prime[i]]]]; i++ ]
CROSSREFS
KEYWORD
nonn
AUTHOR
Neil Fernandez, Jan 27 2003
STATUS
approved