login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

a(n) = floor(A058303*(2^(n-2)+1/2)).
0

%I #9 Jul 10 2012 10:49:00

%S 14,21,35,63,120,233,459,911,1816,3625,7244,14481,28954,57902,115798,

%T 231590,463173,926340,1852673,3705340,7410673,14821340,29642673,

%U 59285340,118570674,237141341,474282675,948565344,1897130682,3794261357

%N a(n) = floor(A058303*(2^(n-2)+1/2)).

%t b1=14.134725 s=2 b[n_, l_]=b1*((s^(n-1))+(s^(l/(2*n+1)-1))) m=40 a=Table[Floor[b[n, l]], {l, 0, 2*m}, {n, 0, m}]

%K nonn,less

%O 1,1

%A _Roger L. Bagula_, Jun 03 2004