|
| |
|
|
A208679
|
|
Kashaev's invariant for the (5,2)-torus knot (Solomon's seal knot).
|
|
7
|
|
|
|
1, 71, 14641, 6242711, 4555133281, 5076970085351, 8024733763147921, 17074591123571719991, 47056485265721520250561, 163059403058191163396938631, 693897612604719894794535433201
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
1,2
|
|
|
COMMENTS
|
In general, Kashaev’s invariant for the (2*m+1,2)-torus knot has e.g.f. 1/2*sin(2*x)/cos((2*m+1)*x). Case m = 1 is A002439. For other examples see A208680 and A208681.
We make the following conjectures:
1) Taking the sequence modulo an integer k gives an eventually periodic sequence with period dividing phi(k). For example, the sequence taken modulo 9 begins [1, 8, 7, 5, 1, 2, 4, 8, 7, 5, 1, 2, 4, 8, 7, 5, 1, 2, 4, 8, 7, 5, ...] with an apparent pre-period of length 1 and a period [8, 7, 5, 1, 2, 4] of length 6 = phi(9).
2) For i >= 0, define a_i(n) = a(n+i). Then for each i the Gauss congruences a_i(n*p^k) == a_i(n*p^(k-1)) ( mod p^k ) hold for all prime p and positive integers n and k. If true, then for each i the expansion of exp(Sum_{n >= 1} a_i(n)*x^n/n) has integer coefficients. (End)
|
|
|
LINKS
|
|
|
|
FORMULA
|
E.g.f.: 1/2*sin(2*x)/cos(5*x) = x + 71*x^3/3! + 14641*x^5/5! + ....
Define F(q) := Sum_{m,n >= 0} (q^(-m*n)*product {i = 1.. m+n} (1-q^i)). For the expansion of F(1-q) and F(exp(-t)) see A208733 and A208730 respectively. Kitami gives the conjectural e.g.f. exp(-9*t)*F(exp(-40*t)) = 1 + 71*t + 14641*t^2/2! + ....
a(n) = (-1)^n/(4*n+4)*20^(2*n+1)*Sum_{k = 1..20} X(k)*B(2*n+2,k/20), where B(n,x) is a Bernoulli polynomial and X(n) is a periodic function modulo 20 given by X(n) = 0 except for X(20*n+3) = X(20*n+17) = 1 and X(20*n+7) = X(20*n+13) = -1.
a(n) = 1/2*(-1)^(n+1)*L(-2*n-1,X) in terms of the associated L-series attached to the periodic arithmetical function X.
a(n) ~ (2*n-1)! * 2^(2*n-3/2) * 5^(2*n-1) * sqrt(5-sqrt(5)) / Pi^(2*n). - Vaclav Kotesovec, Aug 30 2015
Let X = 40*x. G.f. with offset 0: A(x) = 1 + 71*x + 14641*x^2 + ... = 1/(1 + 9*x - 2*X/(1 - 3*X/(1 + 9*x - 9*X/(1 - 11*X/(1 + 9*x - 21*X/(1 - 24*X/(1 + 9*x - ...))))))), where the sequence [2, 3, 9, 11, ..., n*(5*n - 1)/2, n*(5*n + 1)/2, ...] of unsigned coefficients in the partial numerators of the continued fraction is A057569.
A(x) = 1/(1 + 49*x - 3*X/(1 - 2*X/(1 + 49*x - 11*X/(1 - 9*X/(1 + 49*x - 24*X/(1 - 21*X/(1 + 49*x - 42*X/(1 - 38*X/(1 + 49*x - ...))))))))), where the sequence [3, 2, 11, 9, 24, 21, ...] of unsigned coefficients in the partial numerators of the continued fraction is obtained by swapping pairs of adjacent terms of A057569. Let B(x) = 1/(1 - 9*x)*A(x/(1 - 9*x)), that is, B(x) is the 9_th binomial transform of A(x). Then B(x/40) = 1 + 2*x + 10*x^2 + 104*x^3 + ... is the o.g.f. for A208730. (End)
a(1) = 1, a(n) = (-4)^(n-1) - Sum_{k = 1..n} (-25)^k*C(2*n-1,2*k)*a(n-k).
a(n) == 71^(n-1) ( mod (2^7)*3*(5^2) ). (End)
|
|
|
MAPLE
|
A208679 := proc(n) option remember; if n = 1 then 1; else (-4)^(n-1) - add((-25)^k*binomial(2*n-1, 2*k)*procname(n-k), k=1..n) ; end if; end proc:
|
|
|
MATHEMATICA
|
nmax = 20; Table[(CoefficientList[Series[1/2*Sin[2*x]/Cos[5*x], {x, 0, 2*nmax}], x] * Range[0, 2*nmax - 1]!)[[j]], {j, 2, 2*nmax + 1, 2}] (* Vaclav Kotesovec, Aug 30 2015 *)
|
|
|
CROSSREFS
|
|
|
|
KEYWORD
|
nonn,easy
|
|
|
AUTHOR
|
|
|
|
STATUS
|
approved
|
| |
|
|
