|
|
A079734
|
|
n for which there is a chain (or permutation) of the numbers from 1 to n for which each adjacent pair sums to a Fibonacci number.
|
|
1
|
|
|
2, 3, 4, 5, 7, 8, 9, 11, 12, 13, 20, 21, 33, 34, 54, 55, 88, 89, 143, 144, 232, 233, 376, 377, 609, 610, 986, 987, 1596, 1597, 2583, 2584, 4180, 4181, 6764, 6765, 10945, 10946, 17710, 17711, 28656, 28657, 46367, 46368, 75024, 75025, 121392, 121393
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
There are no such necklaces (or cycles).
Theorem (Berlekamp & Guy) There exists such a chain just if n = 9 or 11 or F_k or F_k - 1 for k > 3.
|
|
REFERENCES
|
B. Barwell, Problem 2732, Problems and conjectures, Journal of Recreational Mathematics 34 (2006), 220-223.
E. R. Berlekamp and R. K. Guy, Paper which MAY be called "Fibonacci plays Billiards" and which may be submitted to the Monthly (in preparation as of Jun 2011).
|
|
LINKS
|
|
|
FORMULA
|
G.f.: x*(3*x^13+2*x^12+3*x^11+3*x^10-4*x^9-2*x^8-2*x^7-3*x^6-2*x^5-x^4-x^3+3*x+2) / ((x-1)*(x+1)*(x^4+x^2-1)). - Colin Barker, Dec 02 2014
a(n) = 2*a(n-2) - a(n-6) for n>14. - Colin Barker, Dec 02 2014
|
|
EXAMPLE
|
Examples: 1 2; 1 2 3; 4 1 2 3; 4 1 2 3 5; 4 1 7 6 2 3 5; ...
|
|
MAPLE
|
S := {9, 11}: for i from 3 to 50 do S := S union {fibonacci(i)}: S := S union {fibonacci(i)-1}: od: S := S minus {1}: S := convert(S, list): S := sort(S):for i from 1 to nops(S) do printf(`%d, `, S[i]) od: # James A. Sellers, Feb 25 2003
|
|
PROG
|
(PARI) Vec(x*(3*x^13+2*x^12+3*x^11+3*x^10-4*x^9-2*x^8-2*x^7-3*x^6-2*x^5-x^4-x^3+3*x+2)/((x-1)*(x+1)*(x^4+x^2-1)) + O(x^100)) \\ Colin Barker, Dec 02 2014
(PARI) lista(nn) = Set(concat([9, 11], concat(vector(nn, n, fibonacci(n+3)), vector(nn, n, fibonacci(n+3)-1)))) \\ Michel Marcus, Oct 31 2017
|
|
CROSSREFS
|
|
|
KEYWORD
|
easy,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|