A157176 - OEIS

%I #10 May 29 2024 16:25:35

%S 1,2,2,3,5,8,8,16,16,24,40,64,64,128,128,192,320,512,512,1024,1024,

%T 1536,2560,4096,4096,8192,8192,12288,20480,32768,32768,65536,65536,

%U 98304,163840,262144,262144,524288,524288,786432,1310720,2097152,2097152,4194304,4194304

%N a(n+1) = a(n - n mod 2) + a(n - n mod 3), a(0) = 1.

%H <a href="/index/Rec#order_06">Index entries for linear recurrences with constant coefficients</a>, signature (0,0,0,0,0,8).

%F a(n+6) = 8*a(n).

%F a(6*k) = 8^k; a(A008588(n))=A001018(n);

%F a(6*k+1) = a(6*k+2) = 2*8^k; a(A016921(n))=a(A016933(n))=A013730(n);

%F a(6*k+3) = 3*8^k; a(A016945(n))=A103333(n+1);

%F a(6*k+4) = 5*8^k; a(A016957(n))=A067412(n+1);

%F a(6*k+5) = 8^(k+1); a(A016969(n))=A001018(n+1).

%F G.f.: (1 + 2*x + 2*x^2 + 3*x^3 + 5*x^4 + 8*x^5)/((1 - 2*x^2)*(1 + 2*x^2 + 4*x^4)). - _Stefano Spezia_, May 29 2024

%t LinearRecurrence[{0,0,0,0,0,8},{1, 2, 2, 3, 5, 8},45] (* _Stefano Spezia_, May 29 2024 *)

%Y Cf. A001018, A008588, A013730, A016921, A016933, A016945, A016957, A016969, A067412, A103333.

%K nonn,easy

%O 0,2

%A _Reinhard Zumkeller_, Feb 24 2009

%E a(43)-a(44) from _Stefano Spezia_, May 29 2024