|
| |
|
|
A152122
|
|
A degree eight product sequence: a(n)=1 + 4*Cos[k*Pi/n]^2 + 16*Cos[k*Pi/n]^4 + 64*Cos[k*Pi/n]^6 + 256*Cos[k*Pi/n]^8.
|
|
0
| |
|
|
1, 1, 1, 5, 31, 121, 605, 2911, 13361, 64255, 302621, 1428031, 6770555, 31965701, 151200251, 715034375, 3380212751, 15984722176, 75579365455, 357361263031, 1689760311371, 7989708622205, 37778247366211, 178629122366311
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,4
|
|
|
FORMULA
| a(n)=1 + 4*Cos[k*Pi/n]^2 + 16*Cos[k*Pi/n]^4 + 64*Cos[k*Pi/n]^6 + 256*Cos[k*Pi/n]^8.
|
|
|
MATHEMATICA
| a = Table[Product[1 + 4*Cos[k*Pi/n]^2 + 16*Cos[k*Pi/n]^4 + 64*Cos[k*Pi/n]^6 + 256*Cos[k*Pi/n]^8, {k, 1, (n - 1)/2}], {n, 0, 30}]; Round[%] FullSimplify[ExpandAll[a]]
|
|
|
CROSSREFS
| Sequence in context: A099083 A096944 A053699 * A041303 A184446 A077719
Adjacent sequences: A152119 A152120 A152121 * A152123 A152124 A152125
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Roger L. Bagula and Gary W. Adamson (rlbagulatftn(AT)yahoo.com), Nov 24 2008
|
| |
|
|
