|
Search: id:A152142
|
|
|
| A152142 |
|
A quartic-product sequence: a(n)=Product[(1 + 4*Sin[k*Pi/n]^2 + 16*Sin[k*Pi/n]^4), {k, 1, Floor[(n - 1)/2]}]. |
|
+0
1
|
|
| 1, 1, 1, 13, 7, 76, 39, 421, 217, 2353, 1216, 13201, 6825, 74101, 38311, 415948, 215047, 2334781, 1207089, 13105441, 6775552, 73562593, 38032081, 412916701, 213479175, 2317756876, 1198287271, 13009880533, 6726147337, 73026206161
(list; graph; listen)
|
|
|
OFFSET
|
0,4
|
|
|
FORMULA
|
a(n)=Product[(1 + 4*Sin[k*Pi/n]^2 + 16*Sin[k*Pi/n]^4), {k, 1, Floor[(n - 1)/2]}].
|
|
MATHEMATICA
|
f[n_] = Product[(1 + 4*Sin[k*Pi/n]^2 + 16*Sin[k*Pi/n]^4), {k, 1, Floor[(n - 1)/2]}]; a = Table[f[n], {n, 0, 30}]; Round[a]; FullSimplify[ExpandAll[a]]
|
|
CROSSREFS
|
Sequence in context: A133723 A061045 A095389 this_sequence A110056 A159562 A076116
Adjacent sequences: A152139 A152140 A152141 this_sequence A152143 A152144 A152145
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Roger L. Bagula and Gary W. Adamson (rlbagulatftn(AT)yahoo.com), Nov 26 2008
|
|
|
Search completed in 0.002 seconds
|
