OFFSET
1,2
LINKS
Benoit Cloitre, Plot of a(n) for n=1 up to 1362772
FORMULA
a(n)=(-1)*sum(i=1, n, sum(j=1, i, (-1)^floor(j*(1+sqrt(5))/2)))
a(n) = 2*sum(k = 1, n, sum(i = 1, k, b(i)))-n*(n+1)/2, where b(k) = floor(phi*k)-2*floor(phi*k/2)
PROG
(PARI) a(n)=(-1)*sum(i=1, n, sum(j=1, i, (-1)^floor(j*(1+sqrt(5))/2)))
CROSSREFS
KEYWORD
nonn
AUTHOR
Benoit Cloitre, Jun 17 2003
STATUS
approved