|
| |
|
|
A152116
|
|
Sixth degree product sequence: a(n)=Product[1 + 4*Cos[k*Pi/n]^2 + 16*Cos[k*Pi/n]^4 + 64*Cos[k*Pi/n]^6, {k, 1, (n - 1)/2}];
|
|
0
| |
|
|
1, 1, 1, 4, 15, 45, 160, 533, 1785, 6052, 20295, 68441, 230400, 775657, 2612233, 8794980, 29614935, 99718277, 335764960, 1130580029, 3806834625, 12818225732, 43161016271, 145329992177, 489349324800, 1647717131025, 5548126370513
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,4
|
|
|
COMMENTS
| Limiting ration at n=30: 3.367159464464469.
|
|
|
MATHEMATICA
| a = Table[Product[1 + 4*Cos[k*Pi/n]^2 + 16*Cos[k*Pi/n]^4 + 64*Cos[k*Pi/n]^6, {k, 1, (n - 1)/2}], {n, 0, 30}]; Round[%] FullSimplify[ExpandAll[a]]
|
|
|
CROSSREFS
| Sequence in context: A075673 A062827 A074448 * A195688 A111038 A188716
Adjacent sequences: A152113 A152114 A152115 * A152117 A152118 A152119
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Roger L. Bagula and Gary W. Adamson (rlbagulatftn(AT)yahoo.com), Nov 24 2008
|
| |
|
|
