login
A071730
Smallest prime p > prime(n) such that p-prime(n) is a square.
0
3, 7, 41, 11, 47, 17, 53, 23, 59, 173, 47, 41, 617, 47, 83, 89, 383, 97, 71, 107, 89, 83, 227, 233, 101, 137, 107, 251, 113, 149, 131, 167, 173, 239, 293, 167, 173, 167, 311, 317, 503, 197, 227, 197, 233, 263, 227, 227, 263, 233, 269, 383, 257, 827, 293, 587
OFFSET
1,1
PROG
(PARI) for(n=1, 100, s=n+1; while(frac(sqrt(prime(s)-prime(n)))>0, s++); print1(prime(s), ", "))
CROSSREFS
Sequence in context: A135071 A096219 A128647 * A058815 A333649 A089656
KEYWORD
easy,nonn
AUTHOR
Benoit Cloitre, Jun 24 2002
STATUS
approved