OFFSET
0,7
LINKS
Michel Marcus, Table of n, a(n) for n = 0..1000
Eryk Lipka and Maciej Ulas, A Fibonacci type sequence with Prouhet-Thue-Morse coefficients, arXiv:2109.15243 [math.NT], 2021.
MATHEMATICA
a[0] = 0; a[1] = 1; a[n_] := a[n] = (-1)^DigitCount[n, 2, 1]*a[n - 1] + a[n - 2]; Array[a, 50, 0] (* Amiram Eldar, Oct 01 2021 *)
PROG
(PARI) t(n) = (-1)^hammingweight(n); \\ A106400
lista(nn) = {my(va = vector(nn)); va[1] = 1; va[2] = -1; for (n=3, nn, va[n] = t(n)*va[n-1] + va[n-2]; ); concat(0, va); }
CROSSREFS
KEYWORD
sign
AUTHOR
Michel Marcus, Oct 01 2021
STATUS
approved