|
|
A028596
|
|
Expansion of (theta_3(z)*theta_3(7z) + theta_2(z)*theta_2(7z))^4.
|
|
1
|
|
|
1, 8, 40, 128, 328, 656, 1216, 1864, 2856, 3560, 5392, 6368, 9856, 10640, 17000, 16832, 22600, 23760, 32776, 32576, 43792, 52864, 57568, 58560, 78528, 76024, 94864, 98432, 137864, 116720, 152512, 143040, 179240, 179072, 212112, 237328, 265768, 242352, 296704, 295232
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
LINKS
|
|
|
PROG
|
(PARI) a(n) = polcoeff((1 + 2*x*Ser(qfrep([2, 1; 1, 4], n, 1)))^4, n); \\ Jinyuan Wang, Feb 21 2020
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|