login
A108700
Number of compositions of n into odd and relatively prime parts.
2
1, 1, 1, 3, 4, 7, 12, 21, 32, 54, 88, 141, 232, 376, 604, 987, 1596, 2576, 4180, 6762, 10932, 17710, 28656, 46347, 75020, 121392, 196384, 317808, 514228, 831978, 1346268, 2178309, 3524488, 5702886, 9227448, 14930208, 24157816, 39088168
OFFSET
1,4
LINKS
FORMULA
a(n) = A007436(n) if n is odd, else a(n) = a(n/2) + A007436(n).
MATHEMATICA
a[n_] := a[n] = Module[{d = Divisors[n]}, m = Plus @@ (MoebiusMu /@ (n/d)*Fibonacci /@ d); If[ OddQ[n], m, a[n/2] + m]]; Table[ a[n], {n, 38}] (* Robert G. Wilson v, Jun 21 2005 *)
CROSSREFS
Sequence in context: A293642 A214286 A340359 * A325851 A062202 A049859
KEYWORD
easy,nonn
AUTHOR
Vladeta Jovovic, Jun 19 2005
EXTENSIONS
More terms from Robert G. Wilson v, Jun 21 2005
STATUS
approved