|
|
A341568
|
|
Fourier coefficients of the modular form (1/t_{6a}^3) * (1-6*sqrt(-3)/t_{6a}) * F_{6a}^12.
|
|
0
|
|
|
0, 1, -45, 297, -759, 1089, -1674, 405, 4446, 9099, -22867, -54900, 24300, 273546, 34353, -619893, -574047, 748350, 2466828, -1316812, -3016134, -1623483, 5335065, 5699430, -10936728, -3359880, -1083339, 24803010, 2339387, -28526913, -6509160, -19884183, 60838470, -22877559, 6057828
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,3
|
|
COMMENTS
|
Here, F_{6a} is the hypergeometric function F(1/3, 1/2; 1; 12*sqrt(-3)/t_{6a}). The definition given on page 23 in the linked manuscript has a minor typo where "t_{3A}" should be "t_{6a}". - Robin Visser, Jul 24 2023
|
|
LINKS
|
|
|
PROG
|
(Sage)
def a(n):
if n==0: return 0
eta = x^(1/24)*product([(1 - x^k) for k in range(1, 2*n+1)])
t6a = ((eta(x=x^2)/eta(x=x^6))^6
- 27*(eta(x=x^6)/eta(x=x^2))^6)(x=sqrt(x)) + 6*sqrt(-3)
F6a = sum([rising_factorial(1/3, k)*rising_factorial(1/2, k)/
(rising_factorial(1, k)^2)*((12*sqrt(-3))/t6a)^k for k in range(2*n+1)])
f = (1/t6a^3)*(1-6*sqrt(-3)/t6a)*F6a^12
return f.taylor(x, 0, n+1).coefficients()[n-1][0] # Robin Visser, Jul 24 2023
|
|
CROSSREFS
|
|
|
KEYWORD
|
sign
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|