Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).
%I #15 Dec 22 2021 14:14:58
%S 1,1,2,2,2,3,2,3,3,3,4,3,3,4,3,5,4,4,5,3,4,4,4,6,5,5,6,4,6,5,5,6,4,4,
%T 5,4,7,6,6,8,5,7,6,6,8,6,6,7,5,8,6,6,7,4,5,5,5,8,7,7,9,6,9,8,8,10,7,7,
%U 8,6,10,8,8,10,6,8,7,7,10,8,8,9,6
%N Number of representations of n as a sum of distinct Fibonacci numbers where 1 can be included twice.
%C A part of size 1 can be included twice in the partitions enumerated by this sequence, but there is only 1 way to include it once. The sequence A000119 only allows 1 to be included once and A000121 allows it to be included twice, but it in two different ways once.
%C Some connections with the upper Wythoff sequence (A001950):
%C a(n) = A000121(n) for n in A001950.
%C a(n) = A000119(n) for n-1 in A001950.
%C a(n) = A000121(n) - A000119(n) for n+1 in A001950.
%F G.f.: (1 + x + x^2)*Product_{k>=3} (1 + x^Fibonacci(k)). - _Andrew Howroyd_, Dec 21 2021
%e The a(10)=4 partitions are: 8+2 = 8+1+1 = 5+3+1+1 = 5+3+2.
%e The a(11)=3 partitions are: 8+3 = 8+2+1 = 5+3+2+1.
%e The a(12)=3 partitions are: 8+3+1 = 8+2+1+1 = 5+3+2+1+1.
%o (PARI) seq(n)=my(m=2); while(fibonacci(m)<n, m++); Vec((1 + x + x^2 + O(x*x^n))*prod(k=3, m, 1 + x^fibonacci(k) + O(x*x^n))) \\ _Andrew Howroyd_, Dec 21 2021
%Y Cf. A000045, A000119, A000121, A001950, A003107, A007000, A239002.
%K nonn
%O 0,3
%A _Kung Yue Tong_, Dec 21 2021