login
A060145
a(n) = floor(n/tau) - floor(n/(1 + tau)).
1
0, 0, 1, 0, 1, 2, 1, 2, 1, 2, 3, 2, 3, 4, 3, 4, 3, 4, 5, 4, 5, 4, 5, 6, 5, 6, 7, 6, 7, 6, 7, 8, 7, 8, 9, 8, 9, 8, 9, 10, 9, 10, 9, 10, 11, 10, 11, 12, 11, 12, 11, 12, 13, 12, 13, 12, 13, 14, 13, 14, 15, 14, 15, 14, 15, 16, 15, 16, 17, 16, 17, 16, 17, 18, 17, 18, 17, 18, 19, 18, 19, 20, 19
OFFSET
0,6
LINKS
PROG
(PARI) { default(realprecision, 10); t=(sqrt(5) + 1)/2; f=1/t; g=1/(1 + t); for (n=0, 1000, write("b060145.txt", n, " ", floor(n*f) - floor(n*g)); ) } \\ Harry J. Smith, Jul 02 2009
CROSSREFS
Sequence in context: A054716 A261641 A325622 * A358997 A373461 A257806
KEYWORD
nonn
AUTHOR
Clark Kimberling, Mar 05 2001
EXTENSIONS
Typo in terms corrected by Harry J. Smith, Jul 02 2009
STATUS
approved