OFFSET
1,3
MATHEMATICA
Differences[Table[NestWhile[#-1&, Prime[n]-1, !SquareFreeQ[#]&], {n, 100}]]
CROSSREFS
KEYWORD
nonn
AUTHOR
Gus Wiseman, Dec 04 2024
STATUS
approved