A233759 Bisection of A006950 (the odd part).
1, 2, 4, 7, 13, 21, 35, 55, 86, 130, 196, 287, 420, 602, 858, 1206, 1687, 2331, 3206, 4368, 5922, 7967, 10670, 14193, 18803, 24766, 32490, 42411, 55159, 71416, 92152, 118434, 151725, 193676, 246491, 312677, 395537, 498852, 627509, 787171, 985043, 1229494
Offset: 1
Keywords
Links
- M. P. Zaletel and R. S. K. Mong, Exact Matrix Product States for Quantum Hall Wave Functions, arXiv preprint arXiv:1208.4862 [cond-mat.str-el] (2012), 14 (C2b).
Programs
-
Mathematica
b[n_, i_] := b[n, i] = If[n == 0, 1, If[i < 1, 0, b[n, i - 1] + If[i > n, 0, b[n - i, i - Mod[i, 2]]]]]; a[n_] := b[2 n - 1, 2 n - 1]; Table[a[n], {n, 1, 42}] (* Jean-François Alcover, Dec 11 2018, after Alois P. Heinz in A006950 *)
Comments