OFFSET
1,2
COMMENTS
Next term after 409879 is greater than 10^6.
EXAMPLE
floor((4/3)^21) = 420 and 420 is divisible by 21, so 21 is in the sequence.
MATHEMATICA
t = 1; Do[t = 4t/3; If[Mod[Floor[t], n] == 0, Print[n]], {n, 10^6}]
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Ryan Propper, May 06 2006
EXTENSIONS
a(18) from Ryan Propper, Jul 21 2006
STATUS
approved