|
| |
|
|
A160478
|
|
The p(n) sequence that is associated with the Zeta triangle A160474
|
|
2
| |
|
|
9, 450, 99225, 3572100, 1080560250, 547844046750, 28761812454375, 66497310394515000, 324074642207668852500, 170139187159026147562500, 495019965039186576333093750, 74252994755877986449964062500
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 2,1
|
|
|
FORMULA
| a(n) = 3*2^(3-2*n)*(2*n-1)!*A160476(n), for n = 2, 3, .. , with A160476 the first right hand column of the Zeta triangle.
|
|
|
MAPLE
| nmax:=15: jn:=nmax: im:=nmax: Omega(0):=1: for n from 1 to nmax do for j from 1 to jn do cfn1(1, j):=1 end do: for i from 2 to im do cfn1(i, 1):=0 end do: for j from 2 to jn do for i from 2 to im do cfn1(i, j):=cfn1(i-1, j-1)*(j-1)^2+cfn1(i, j-1) end do end do: Omega(n):= (sum((-1)^(k+n+1)*(bernoulli(2*k)/(2*k))*cfn1(n-k+1, n), k=1..n))/(2*n-1)! end do: for n from 1 to nmax do d(n):=(Omega(n)*2^(2*n-1)) end do: for n from 2 to nmax do Zc(n-1):= d(n-1)*2/((2*n-1)*(n-1)) end do: c(1):=denom(Zc(1)): for n from 1 to nmax-1 do c(n+1):= lcm(c(n)*(n+1)*(2*n+3)/2, denom(Zc(n+1))): p(n+1):=c(n) end do: seq(p(n), n=2..nmax);
|
|
|
CROSSREFS
| Cf. A160474 and A160476.
Sequence in context: A196965 A069073 A156086 * A020263 A061175 A166879
Adjacent sequences: A160475 A160476 A160477 * A160479 A160480 A160481
|
|
|
KEYWORD
| easy,nonn
|
|
|
AUTHOR
| Johannes W. Meijer (meijgia(AT)hotmail.com), May 24 2009
|
| |
|
|
