OFFSET
1,2
EXAMPLE
See A184802.
MATHEMATICA
(See A184802.)
With[{c=Sqrt[5]}, Select[Range[600], PrimeQ[Floor[# c]]&]] (* Harvey P. Dale, Jul 20 2011 *)
PROG
(PARI) is(n)=isprime(sqrtint(5*n^2)) \\ Charles R Greathouse IV, May 22 2017
CROSSREFS
KEYWORD
nonn
AUTHOR
Clark Kimberling, Jan 22 2011
STATUS
approved