OFFSET
1,1
COMMENTS
k is a term if and only if k/gpf(k) > nextprime(gpf(k)), where nextprime = A151800.
LINKS
Jianing Song, Table of n, a(n) for n = 1..13098 (all terms <= 50000)
EXAMPLE
8 is a term since the number of steps needed to reach 0 of the iteration x -> x - gpf(x) starting at 8 is 3: 8 -> 6 -> 3 -> 0, and 3 < 8/gpf(8).
PROG
(PARI) isA356441(n) = if(n>1, my(p=vecmax(factor(n)[, 1])); n/p>nextprime(p+1), 0)
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Jianing Song, Aug 07 2022
STATUS
approved