|
|
A280523
|
|
a(n) = Fibonacci(2n + 1) - n.
|
|
4
|
|
|
1, 3, 10, 30, 84, 227, 603, 1589, 4172, 10936, 28646, 75013, 196405, 514215, 1346254, 3524562, 9227448, 24157799, 63245967, 165580121, 433494416, 1134903148, 2971215050, 7778742025, 20365011049, 53316291147, 139583862418
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
Old (and equivalent) definition: these are the indices of records in the Fibonachos sequence A280521: the least k such that A280521(k) = n.
Define the n-th Fibonacci compositions CF(n) by CF(1)={(1)}, CF(2)={(2)}, and CF(n) is 1 adjoined at the end of each composition in CF(n-1) union 2 adjoined to the end of each composition in CF(n-2). The union is disjoint, so |CF(n)| is the n-th Fibonacci number. Define the weight of a composition c by 2^(number of singletons in c). For example, 2122 has 1 singleton and weight 2. Let s(n) be the sum of the weights of CF(n). Conjecture: a(n)= s(2n+4)-s(2n+3). - George Beck, Jan 31 2020
|
|
LINKS
|
|
|
FORMULA
|
G.f.: -x*(-1+2*x-3*x^2+x^3) / ( (x^2-3*x+1)*(x-1)^2 ). - R. J. Mathar, Mar 11 2017
|
|
EXAMPLE
|
a(6) = 227 because A280521(227) = 6;
a(7) = 603 because A280521(603) = 7;
a(8) = 1589 because A280521(1589) = 8.
|
|
MATHEMATICA
|
LinearRecurrence[{5, -8, 5, -1}, {1, 3, 10, 30}, 30] (* Harvey P. Dale, Feb 06 2024 *)
|
|
PROG
|
(PARI) F=vector(64, n, fibonacci(n+2)-1); \\ Resize as needed
A280521(n)=my(s); while(n, s++; t=setsearch(F, n, 1); if(t, n-=F[t-1], return(s))); s
first(n)=my(v=vector(n), k, t, mn=1, gaps=n); while(gaps, t=A280521(k++); if(t>=mn && t<=n && v[t]==0, v[t]=k; while(mn<=n && v[mn], mn++); print("a("t") = "k); gaps--)); v \\ Charles R Greathouse IV, Jan 04 2017
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|