A122249 Numerators of Hankel transform of 1/(2n+1).
1, 4, 256, 65536, 1073741824, 70368744177664, 73786976294838206464, 309485009821345068724781056, 332306998946228968225951765070086144, 1427247692705959881058285969449495136382746624, 98079714615416886934934209737619787751599303819750539264
Offset: 0
Programs
-
Mathematica
Table[4^(Sum[Sum[Floor[k/2^j],{j,0,n}],{k,n}]),{n,0,10}] (* James C. McMahon, Oct 27 2024 *)
Formula
a(n)=4^A122247(n); a(n)=4^sum{k=1..n, sum{j=0..n, floor(k/2^j)}};
Extensions
a(10) from James C. McMahon, Oct 27 2024
Comments