OFFSET
1,1
LINKS
Paolo Xausa, Table of n, a(n) for n = 1..10000 (terms 1..1000 from Harry J. Smith).
FORMULA
Lim_{n->infinity} a(n)/n = 4?
MATHEMATICA
A065564Q[k_] := 3*Floor[#*4/3] == 4*Floor[#] & [(4/3)^k];
Select[Range[300], A065564Q] (* Paolo Xausa, Nov 11 2025 *)
PROG
(PARI) isok(k) = { my(f=4/3); floor(f^(k + 1))/floor(f^k) == f } \\ Harry J. Smith, Oct 22 2009
CROSSREFS
KEYWORD
nonn
AUTHOR
Benoit Cloitre, Nov 30 2001
EXTENSIONS
a(55)-a(57) corrected by Harry J. Smith, Oct 22 2009
STATUS
approved
