OFFSET
1,1
MATHEMATICA
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}]
CROSSREFS
KEYWORD
nonn,less
AUTHOR
Roger L. Bagula, Jun 03 2004
STATUS
approved