OFFSET
1,1
COMMENTS
All terms are 0, 1, 2, or 3 (cf. A078147).
MATHEMATICA
Table[NestWhile[#+1&, n, SquareFreeQ[#]&]-n, {n, 100}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Gus Wiseman, Dec 01 2024
STATUS
approved