OFFSET
2,1
COMMENTS
Does every odd prime differ from some smaller prime by a squarefree integer? Or is there at least one term of this sequence equal to 0?
Indices for which a(n)<a(n-1) are n = 26, 32, 64, 79, 89, 92, 98, 100, 123, 127, 129, 133, 136, 148, 152, 159, 164, 169, 181, 193,... - M. F. Hasler, Nov 23 2008
LINKS
Michael De Vlieger, Table of n, a(n) for n = 2..10000
MATHEMATICA
Table[NestWhile[NextPrime[#, -1] &, p, ! SquareFreeQ[# - p] &], {p, Prime@ Range[2, 10^4]}] (* Michael De Vlieger, Oct 30 2017, after Harvey P. Dale at A152075 *)
PROG
(PARI) A152076(n) = local(q=n=prime(n)); while( q=precprime(q-1), issquarefree(n-q) && return(q)) \\ M. F. Hasler, Nov 23 2008
CROSSREFS
KEYWORD
nonn
AUTHOR
Leroy Quet, Nov 23 2008
EXTENSIONS
Terms beyond a(13) from M. F. Hasler and Ray Chandler, Nov 23 2008
STATUS
approved