%I #10 Aug 20 2021 04:22:03

%S 1,7,14,21,66,205,583,837,1259,1631,2178,6346,15851,58371,61804,

%T 129196,409879,1670753

%N Numbers k that divide floor((4/3)^k).

%C Next term after 409879 is greater than 10^6.

%e floor((4/3)^21) = 420 and 420 is divisible by 21, so 21 is in the sequence.

%t t = 1; Do[t = 4t/3; If[Mod[Floor[t], n] == 0, Print[n]], {n, 10^6}]

%Y Cf. A073633.

%K nonn,more

%O 1,2

%A _Ryan Propper_, May 06 2006

%E a(18) from _Ryan Propper_, Jul 21 2006