|
Search: id:A152122
|
|
|
| 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, 1, 5, 31, 121, 605, 2911, 13361, 64255, 302621, 1428031, 6770555, 31965701, 151200251, 715034375, 3380212751, 15984722176, 75579365455, 357361263031, 1689760311371, 7989708622205, 37778247366211, 178629122366311
(list; graph; listen)
|
|
|
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 this_sequence A041303 A077719 A005826
Adjacent sequences: A152119 A152120 A152121 this_sequence A152123 A152124 A152125
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Roger L. Bagula and Gary W. Adamson (rlbagulatftn(AT)yahoo.com), Nov 24 2008
|
|
|
Search completed in 0.002 seconds
|
