OFFSET
1,4
LINKS
Charles R Greathouse IV, Table of n, a(n) for n = 1..10000
EXAMPLE
PROG
(PARI) vector(80, n, prime(n+1) - floor(sqrt(prime(n)*prime(n+2)))) \\ Michel Marcus, Jun 02 2015
(PARI) a(n, p=prime(n))=my(q=nextprime(p+1), r=nextprime(q+1)); q - sqrtint(p*r) \\ Charles R Greathouse IV, Jun 02 2015
CROSSREFS
KEYWORD
sign
AUTHOR
Reinhard Zumkeller, Jul 22 2002
STATUS
approved